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% EoiroriaL 


J'espére que ce premier numéro de 1983 
vous plaira! Je ne vous promet pas que les sutvants 
atent autant de pages, mats aprés tout ti ne tient 
qu'a vous... 

J'at profité des vacances de Noël pour ta- 
per un grand nombre d'articles qui étatent en souf- 
france. C'est sans doute la dernière fois que je pour- 
rat le faire. En effet mon épouse et mot attendons 
pour le mots de Février l'arrivée d'un (une?) hérti- 
tier qui va occuper une place inversement proportion- 
nelle à sa taille. Cette date correspondant i peu prés 
à celle du prochain numéro du journal il faut s'atten- 
dre à des perturbations dans le calendrier, dans le 
contenu ou dans Les deux, plus ou moins importantes 
selon La date réelle de l'évènement. Je vais essayer 
de sortir le joumal début Février pour évtter les che- 
vauchements, mais dans ce cas tl sera "léger". J'at 
envisagé un moment de préparer aujourd'hui des pages 
pour Le prochain numéro, mats j'at trouvé ridieule 
de mettre "sous Le coude" des informations que je 
pouvais diffuser tout de suite. Disons que dans ce nu- 
méro TL y a un peu du prochain. 

Ceci dit, ce qui représente du travail, ce 
n'est pas la mise en page mais la frappe et st j'at 
des articles "formattés", ils seront publtés. 


Je ne veux pas terminer cet édito sans at- 
tirer votre attention sur La rubrique "Sur le Marché" 
où vous trouverez La description d'une boite d'EPROM 
française qui met le langage machine À moins de 1000F 
et done i la portée de tous. 

Je vous souhaîte une bonne année, plein de 
programmes, réussite, santé.... 

Jean-Dantel Dodin 


(7226 T1) 


*k * 


Xk Les Journaux 


Beaucoup de mouvement cette fots-cet! 


Angleterre: 


Youvelle présentation du jourmal, matnte- 
nant appelé DATAFILE. Format comme le notre, 40 pages, 
bimestriel, reliure collée avec bande, couverture de 
couleur verte...et cotisation à £18 sott prés de 220F. 


A ce prix là, je peux en faire autant fact- 
lement. Je ne suts pas sûr que cela en vatile la pet- 
ne. Je peux factiement avoir une couverture en cou- 
leur (papier en couleur) pour .905 F de plus par ex- 
emplaire ce qui est négligeable, mats la reliure est 
coûteuse, environ 3 F l'exemplaire, je cerots que nous 
garderons les agraphes. Le nombre de pages dépend de 


La production TAPEE AU FORMAT des adhérents. 


Australie: 

Enfin un nouveau numéro de PPCTN. Notre: 
activité est cité.(c'est le N°13).Beaucoup d'articles 
sur Le mterocode el le bavardage inimitable de Me- 
Gechte. 


USA : 

PPCJ V9 N7 Octobre Novembre 1982, 64 pages, 
il y à trop de choses pour que je putsse les citer. 
remarquons une parttetpatton plus tmportante que d'ha- 
bttude du. mterocode. 


Key Notes V6 N4 Septembre-Décembre 1982 
annonce (et publie exceptionnellement) un Key Notes 
consacré au HP 75C.Présente le Plotter et le module 
graphique. Comme je le pensais ce module agit ausst 
sur l'imprimante HP-IL 82162A, sûrement pour les codes 
barre, peut-être pour d'autres choses. 

Un bulletin téléphonique de PPC indiqueratt 
que Key Votes suspend sa parution. Cette nouvelle est 
trés étonnante car le numéro actuel fait référence à 
un prochain numéro à plusteurs reprises (annoncant 
un article de Richard Nelson). J'éspére que c'est une 
fausse nouvelle... 


Le premter numéro du Computer Joumal of 
PPC Septembre-Octobre 1982 vient de parvenir en France. 

Il n'est pas enthoustasmant, mats c'est 
normal pour un premter numéro. Il traite des micero- 
ordinateur HP type 70 (75C) ou 30 (85,86,87...) 


Allemagne: 


Pas de nouveau numéro de CCD (PRISMA), mats 
un correspondant allemand francophone (voir atlleurs 
dans ce numéro) 


* * 


PETITES ANNONCES: 


T120 vends HP 41C (3/82) 1400F, module MEV 
150F, le tout 1500 F. 


T23 a toujours à vendre (prix en batsse): 1 HP41C 053/ 
82 1750 F;2 lecteurs de cassettes 3500 F;1 lecteur de 
codes barre ?50 F; 1 module X-F 475F; 2 modules X-M 
475 F; 1 module Time + solution book 500 F 

T 85 vends module mémoire simple environ 200F 

T 57 vend 2 modules mémotre équivallent à un QUAD 
sutvant la méthode exposée dans Ll'OI: 500 F les 2 


*  % 


DIVERS 


T123 SIGNALE un défaut sur les fonctions REGPLOT et 
STKPLOT en utilisant l'imprimante HP-IL 821624A- 

St l'on utilise une des fonctions ci-dessus 

un caractére © (N°16 ou 144?) est chargé en mé- 

motre tampon: 

st les paramétres sont erronnés 

st le drapeau de contrôle d'erreur (25) 
est levé 

et st l'imprimante n'est pas l'appareil 
prinetpal de la boucle HP-IL 
Disponible à Toulouse: J'ai remarqué que les numéros 
de l'Ordinateur Individuel sur "les instructions ca- 
chées de la HP41C" ne sont plus disponibles. Aussi 
j'ai décidé de fournir aux amateurs d'histoires 


anciennes: plO Instructions cachées 10 F+ET à 5,80 


FEUILLES VOLANTES: 


Mon papa , éditeur (petit éditeur!) en 
retraite continue à éditer et à imprimer lut même des 
feuilles volantes", sorte de petit journal parlant 
de tout et de n'importe quot en philosophie, scetences, 
et bien d'autres choses. 

Ces "feutlles volantes" sont dispontbles 
sur catalogue pour les anciennes et sur abonnement pour 
les futures, prix: La feutile isolée 1F, abonnement 
par an 10 F, la ruine, quot! deux numéros par an de 
stx feutlles de 1 à 6 pages. 

Adresser les commandes de feuilles et de 
catalogues à Lucten Dodin, LES PRISMES 234 Av Mal 
Leclerc 34000 Montpellier. N'hésitez pas à joindre 
une lettre au courrter. 


FOLLE OU PAS? 


Une expérience curteuse faite récemment à 
Toulouse. Un de nos adhérents vient me trouver catas- 
trophé: 11 vient d'acheter un lecteur de cartes et 
dés que Le lecteur est branché la HP devtent folle, 
refuse de faitres un CAT 2, affiches des caractéres en 
prinetpe imposstbles (même en micerocode!}). 

Un essat avec le SM-1C, c'est à dire Le 
module de service HP qui est sensé controler la machine 
ne donne rien, la 41C refusant tout simplement de 5e 
brancher sur le module. Or ce branchement est une des 
premières choses que fait le micerocode à l'allumage de 


a des problémes. 

Pas de dtagnostie possible, sinon une 
apparente ineapactté à recevoir les périphériques. 

Je ne peug La mort dans l'âme que recommander un re- 
tour en service aprés vente. 

Le lendemain, revisite de l'adhérent, aprés 
une nutt sans piles la HP avait reprit son foncetion- 
nement normal! 

Je ne vois qu'une explication: des charges 
d'électrictté statique interdisant le fonctionnement 
de la ligne qui transfère les données vers l'extéri- 
eur. 

St je cite cet exemple, c'est pour instster 
sur le fait que, st Le diagnostic n'est pas certain 
(bien sur st la machine est passé sous un camion ce 
procédé ne servira à rten) il faut laisser La HP sans 
ptlies un bon moment (2 ou 3 jours) avant de l'envoyer 
en réparation. L'ennut c'est que chaque fots que l'on 
veut essayer le fonctionnement on remet les batteries... 
et tout recommence . 

EE 


PPC-T N 3 
JANVIER FEVRIER 
1983 P2 


DIVERS 


Anct BANQUE BASTIDE 


FONDÉE EN 1829 





RAT 4  C.C-P. TOULOUSE 1983-50 Z 


SOCIETE DE BANQUE MIDI-PYRENEES 


SIÈGE SOCIAL: 1, RUE ABELLAN - 09300 LAVELANET 


R.C. FOIX B 955 880 179 





Siège de TOULOUSE 


Adr. Télégr. 
ce f dette 


k Télex n°520375 














__TOULOUSE le 18/10/82 19 


NyRé.531 DT 3435 
ETR/FD 


Nous avons l'honneur de vous remettre ci-dessous un chèque 
We beg to hand you hereunder crossed cheque in 

barré en règlement de l'opération détaillée ci-contre 
settlement of the transaction detailed next column 


P.P.C. / 
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Montant et nature de la monnaie Chèque -799 ,800, 853. 
USD 275,60 Ne 011447 
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DEUX CENT SOIXANTE QUINZE DOLLARS US ET 
SOIXANTE CENTS 










USA 
TOULOUSE 


Vos dévoués / Yours truly 
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— 


Compte-rendu de la réunion de PPCT du 13/11/82 


Il s'agissait de la 4° réunion et de la 2° comme 
réunion de l'association,s'y sont retrouvés 9 participants. 


En 1° lieu,l'épicerie du club etait en place et l'on pouvait 
voir ou se procurer la bibliographie maintenant classique:(TIPS 
DICTIONARY,etc..) ainsi que les receuils des microcodes de la 
machine ou de ses periphériques (entre autre un receuil d'ori- 
-gine HP et commenté des microcodes du CPU de la 41) . 
Le début de la réunion fut consacré à une série d'informations 
générale: 
A Lecture du courrier recent . 
A Communication du plan d'ouvrage du livre de Jean- 
Daniel DODIN (T1) ‘Au fond de la 41C,actuellement le 
livre le plus complet sur la machine et en fraçais ! 
Suivit ensuite un commentaire sur l'édition du journal de PPCT 
Il en résulte que l'envoi d'articles dactilographiés divise par 
trois le temps consacré àla mise en page( 2 jours au lieu d'une 
semaine ).Le club s'équipera surement à la longue d' un traite- 
-ment de texte efficasse pour l'instant les envois manuscrits 
subissent un retard dans leur parution . 
Les problémes financiers furent en suite examinés : 
I1 s'agissait surtout de la répercution des augmentations du 
prix du matériel HP ou en provenance des USA (hausse du dollar) 
sur les tarifs pratiqués par la coopérative de PPCT.Par expem-— 
-ple les cartes magnétiques ont subit une hausse de 50% en 3 
mois . 
Le reste de la réunion fut une discussion sur la machine : 
Aspets matériels : Le probléme des batteries d'origine HP ,de 
nouvelles solutions seraient l'utilisation de bat- 
-teries au plomb 6V (du type utilisé pour les motos ) 
ou le branchement direct d'un chargeur 6V sur l'impri- 
-mante . 
Programmation : 
A Initiation à la programation synthétique :L.G/B.G 
A L'affichage de la 41: Il se comporte comme un péri- 
-phérique du CPU c'est lui qui détient le jeu de ca- 
-ractéres affichables. 
A Du packing et de la compilation . 
Introduction à l'usage de Ll'éprom box et du PPC rom 
A Importance et fonctionnement des registres d'états 


œ 
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TOULOUSE 


Ordre du ; Order dated / 


Motif du paiement / Details of payment / 


SETLLEMENT OF INVOIUES N°; 


Bénéficiaire / Beneficiary / 


CORVALLIS SOFTWARE INC. 
P,0. BOX 1412 CORVALLIS, 
OR 97339-1412 


-id- 
Chèque émis sur / Drawn on } 


IRVING TREST CY 





JEAN DANIEL DODIN . 
St votre banque refuse 

de vous fatre un chéque 
pour l'étranger, demandez 
le service étranger de 

La banque et montrez lui 
ça. C'est Le double d'un 
chéque reçu par Corvallis 
Software en réglement de 
livres. 





Destinataire / To: / 


Pour finir à noter le confort d'espace que nous 
avait offert la M.J.C de la Faourette . 


X Sue Le Manche 


Un joli jouet: Le HP 9000: 





rien que pour le plaisir et pour faire rêver: 
j'ai assisté à une démonstration du dernier né de HP, 
j'ai nommé Le HP 9000. Pas encore une machine de po- 
che (ce serait, parait-il pour bientôt) mais un or- 
dinateur de table de bonne taille, un écran graphique 
haute résolution couleur (le même que celui du 9845), 
des caractéristiques techniques à faire rêver et une 
technologie superbe. 

Sachez d'abord que Mother HP fait partie 
des 100 premières firmes mondiales avec un chiffre 
d'affaire de 4 milliards de $ (la 41C ne doit pas in- 
tervenir pour grand chose là-dedans) et 65 000 em- 
ployés, dont 2000 en France. 

Le HP 9000 , lui est un “micro ordinateur" 
(par la taille) 32 bits, avec une horloge à 18 MHz, 
une instruction par cycle d'horloge et jusqu'a 7 
processeurs fonctionnant en tandem (3 seulement pour 
l'instant). IL y a 450 000 transistors sur la puce 
de 5x5 mm et celle-ci chauffe 25w! d'où un support 
trés sophistiqué à base de substrat en geuivre recou- 
vert de téflon pour le refroidissement (9 couches 
au total). Les chip de mémoire vive font 128Kbits 
et 650 000 transistors... | 

chiffres en vrac: travail de 250 personnes 
pendant 6 ans, inversion d'une matrice 10x10 en 43 ms 
prix du CPU sur sa carte 80 000 F, de l'ensemble entre 
250 000 et... 

Version de base format grosse machine à 
écrire pouvant contenir 3 CPU, un disque Winchester 
10 MOctets,500 KOctets de mem vive en ligne, une 
vitesse de tracé sur l'écran de 10 000 vecteurs de 
l pouce par seconde (200 métres/sec), un basic compi- 
16, un systéme prévu pour fonctionmer en réseau... 


j'en ai comandé un pour servir de presse 
papier (il fait quand même 80 kg!) 


BOITE D'EPROM FRANCAISE! ! ! 1! 1 


Cher Jean-Daniel, 

Voilà enfin la réalisation d'un projet que 
je mène depuis bientôt deux mois avec ce premier exem-— 
plaire de la BE-01-4K (Boite d'EPROM version OL de 4K) 

Je suis maintenant prêt pour assurer cette 
fabrication en série. Ces dernières semaines m'ont 
permis de donner une touche un peu plus professionnel- 
le au circuit imprimé et à trouver les connecteurs à 
force d'insertion nulle. Il reste cependant que ce 
premier exemplaire n'est pas parfait dans la finition 
les suivants seront plus soignés. 

Le prix de vente pour les adhérents de PPC 
est de 700 F . Ce prix comprend un BE-01-4K, une no- 
tice d'utilisation et le port; pour ce premier exem- 
plaire, je te demanderai de m'envoyer seulement 500F, 
car je ne veux pas te compter la maïn d'oeuvre (il 
y a 4 à 5 heures de travail!...). Par rapport à mes 
prévisions, j'ai dû modifier mon prix à cause de la 
sortie du blocage, des variations du $, qui ont joué 
sur le prix des matériaux. 

Je joins à cette lettre deux documents: 
BE-01-4K + implantation mécanique et cable. 

Je pense que le premier pourrait-être pu- 
blié dans le prochain numéro de PPC-T Car il explique 
ce qu'est la BE-01-4K et comment la commander, aprés 
correction des fautes d'orthographe (je suis nul). 

Le deuxiéme document permet de construire 
le cable de liaison entre BE-01-4k et HP4lC. Ce cable 
pourrait devenir un standard à PPC-T car il est com- 
patible avec le MLDL et je pense m'en servir pour peut- 
être un futur circuit reprenant la partie RAM du MLDL. 

Je compte sur les vacances de noël pour 
préparer quelques BE-01-4K et La notice d'utilisation 
qui pourrait contenir: 

Présentation BE-01-4K (document que je 
t'envoie) 

Conseils d'utilisation 

CABLE 

La première et troisiéme partie reprendrait 
les documents que je t'envoie, j'aimerai que tu me 
dise ce qu'il faudrait modifier pour que cela soit 
plus clair. 


Conseils d'utilisation: 

Ne pas faire reposer le BE sur une surface 
métallique lorsqu'il est en fonctionnement. 

Mettre les interrupteurs Dn dans la bonne 
position: ON D=1, OFF D=0 

C'est simple: mettre en binaire le numéro 
d'adresse que vous voules utiliser (cf plan de la mé- 
moire morte ailleurs dans ce numéro): F=1111,4=0100, 
ete...Prenez La BE avec les EPROM à ‘gauche et les in- 
terrupteurs à droite et écrivez le chiffre en question 
en binaire avec les interrupteurs.st vous voulez l'a- 
dresse F, tous les interrupteurs seront en haut, pour 
l'adresse 4, ils seront de gauche à droite bas,haut, 
bas, bas. 

Attention, pour un usage normal (TR-IC, 
par exemple) vous ne pouvez utiliser que les adresses 
à partir de 5. Je vous consetile de recopier la carte 
mémoire vive donnée dans ce numéro sur un morceau de 
papier scotché sur le porte batterie de votre HP en y 
mentionnant le contenu de chaque adresse. Un seul 
module par adresse!!1!1 

Insérer les EPROM dans les supports avant 
connexion à la 41C (ou au moins 41C éteinte. Mais j'at 
mille fois fait l'opération sans rien éteindre et sans 
ennuts... à vos rtsques et pértis!). Au besoin re- 
dresser les pattes avec une pince plate pour la premi- 
ère utilisation.(la pince est dangereuse, vous risquez 
de casser Les pattes, à n'uttliser que st l'EPROM vous 
est arrivée en mauvais état. Avec une EPROM neuve, les 
pattes sont toutes trop écartées pour entrer dans ce 
modéle de support, tl faut les plier toutes ensembles 
en posant L'EPROM sur un livre et en la faisant tour- 
nerautour du plt des pattes). 

Le repére en U et en creux de Ll'EPROM doit 
être placé en haut, du coté ou il y a gravé 2716 et 
2732, en respectant bien le type d'EPROM 

U2= 2716 

L8= 2732 (trés important) 

Le connecteur à mettre sur La BE doit res- 
pecter la position du repère 1 (le 1 est inscrit sur 
le circuit imprimé au dessus du transistor prés de la 
première patte du support recevant le connecteur 
{support marqué HP-41C sur le planet être celui décrit 
dans les documents CABLE. Sur les supports, le coté 1 
est munt d'un chanfrein (angle abattu). TA 

Il est recommandé d'éviter de laisser le BE 
sur une surface chargée d'électricité statique, 
n'est pas utilisé. Une boite en fer serait préférable; 
pas de boitier en plastique (j'utilise une botte en 
carton , une feutlle d'alu ménager mise à la terre dott 
être trés bien) 


losqu'il 


Le elub a acheté ce BE-01-4K et un exem- 
plaire de TR-1C, qui peut être prêté pour quelques 
jours à ceux qut veulent l'essayer (sur Toulouse ou 
environ). La fabrication est trés propre, tous les 
cireutts sont sur supports ce qui est sans doute su- 
perflu. Les dimensions sont exactement celles d'une 
botte de 120 cartes magnétiques avec classeur vendue 
par HP, diminuée en hauteur de lem. Le cordon de liat- 
son peut être obtenu chez Jacques Vaucelle, mais til 
est facile à faire avec un peu de soin et une prise 
de récupération (coté HP). Vous avez la possibilité, 
maintenant de voir ce que c'est que des fonctions en 
miterocode. L'essayer c'est l'adopter. 


LE BE-01-4Kk : 


La BE-01-4K est une boite d'EPROM version 
1 de 4K permettant de faire lire par la HP41C des 
programmes écrits en langage machine (microcode) dans 
des EPROM. Son prix relativement bas doît permettre 
de rendre accessible à un grand nombre de personnes 
cette nouvelle forme de programmation puissante qu'est 
la programmation en microcode. 


Elle se présente sous la forme d'un circuit 
imprimé double face de 144x76 mm (soit les dimensions 
de votre HP4l ou de son aide mémoire), avec 4 trous 
de fixation permettant une mise en coffret personnali- 
sée (je recommande vivement l'utilisation de colle 
"Hot Melt" -petits batons utilisés par une sorte de 
pistolet- pour La fixation du cireutt}). 

Tous les composants sont montés sur sup- 
ports afin de permettre un dépannage rapide ou une 
utilisation ultérieure des composants pour ceux qui 
désirent construire le MLDL. La BE-01-4K peut-être 
implantée dans n'importe quel emplacement mémoire 
à l'aide de 4 interrupteurs miniatures, et reliée à 
la HP-41C (dans un des 4 ports) à l'aide d'un cable 
spécial non fourni mais réalisable par n'importe quel 
bricoleur à l'aide des documents envoyés avec la BE, 
ou directement monté chez Jacques Vaucelle (La Chas- 
serie 35133 Romagné tel 16 (99) 98 83 69. 

Deux supports à force d'insertion nulle 
permettent d'insérer ou d'échanger un jeu d'EPROM 
aussi facilement que les modules HP de votre HP-41. 

Ces EPROM sont à commander à J-D Dodin 
ainsi que son livre: Au Fond de La HP-41C qui permet 
de comprendre cette fameuse programmation microcode 
(J-D Dodin 77 rue du Cagire 31100 Toulouse). 

La BE-01-4K est disponible uniquement chez 
“l'artisant" Didier Jehl (8116 T80) Appartement N°8 
9 rue Utrillo Résidence les Hochettes 62000 ARRAS 

Son prix est de 700 F, payable à la com- 
mande, et livrable sous 4 semaines maximum (pour les 
premières commandes}, en recommandé urgent. J'assurerai 
une garantie de 6 mois (peut-être un an ou plus) piëè- 
ces et main d'oeuvre à la seule condition décrite 
dans la notice jointe (interdiction de lui faire faire 
des chütes de 50 m!{!) 

Pour chaque commande, veuillez indiquer 
700 F (en chéques si possible) 

Nom Prénom N° PPC-T 
Adresse compléte 
N°tel 
La première BE-01-4K est visible chez notre président 
J-D Dodin (et empruntable pour essat). 
LE CABLE: 


Il permet de faire La liaison entre HP-41 
et BE-01-4K (et £futurs?...), il n'est pas fournit avec 
BE mais nécessite seulement quelques composants et 
un peu de travail soigné. 
Matériel: 

l)Connecteur femelle: un vieux module sur 
lequel on récuperera (cf l'Ordinateur Individuel N°23 
p 87, article de Poupée) le boitier en plastique et 
le connecteur métallique (ouvrir avec un cutter Le 
long du plan de joint de collage.dessouder avec soin 
le module qui pourra resservir (par exemple accouplé 
avec un autre pour faire un module double (les habitu- 
és du BASIC ne seront pas effrayés par les (Imultiples)) 

2) cable : 40 cm (au plus) de cable plat 
souple (ou fil en nappe) de 12 conducteurs (14 conduc- 
teurs moins 2) 

3) Connecteur mâle: un connecteur à ser- 
tir sur cable plat 16 broches ou une douille monta- 
ble pour l'enroulement de fil (REF 276-1980 16 con- 
tacts de TANDY)(Je ne l'ait pas trouvé dans le catalogue 
mats le magasin a coté de chez mot (Tandy) en avait 
un). 

4) un peu de soudure, un petit fer à souder, 
1 kg de soins et 1 litre de patience ! 
Travail à effectuer: 

1) souder, dans l'ordre les 12 fils du cable 
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2) en respectant les données du document 
cable, relier les 12 fils du cable plat sur le con- VUE DE DESSOUS 
necteur male. CP 

Il est fortement conseillé de vérifier à 
chaque fois,que La liaison effectuée correspond à cel- 
le du tableau à l'aide d'un ohm métre ou d'une lampe 
de poche (souder deux fils en paralléle sur l'interru- 
pteur ; laisser l'interrupteur ouvert, mettre les 2 
fils sur les deux extrémités de la liaison à vérifier, 
si la lampe s'allume, OK, sinon refaire les soudures. 
(mon expértence personnelle me dit que a) il faut 
$tamer chaque fil à la soudure fine avant de les mettre 
en place, b)la connexion (soudure) doit se fatre sur 
au motns'l mm , sinon elle casse, ce) Le plus grand 
danger est celut de court-etreutts provoqués par des MALE 
fils fins "baladeurs" mal rassemblés avec les autres 
Lors du «a. Un examen visuel à la loupe est trés eF- 
ficace pour déceler les défauts. ) 

3) bien faire attention à la numérotation 
des broches des connecteurs: 
femelle, vue de face, La face portant le numéro du 
module est vers le bas (ex: HP 82170A Made in Singapore) 
la barrette permettant de retirer le module est derrière 
en haut. 

Mâle, vue de dessous, coté broches, la patte 1 est 
indiquée sur le connecteur soit par un pan coupé soit 
par une encoche en U située sur le petit coté corres- 


NOTE: 4,5,12,13 
non connectes 
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80 COLONNES: 
Jacques Vaucelle monte des imprimantes 


80 colonnes pour boucle HP-IL. Prix et type d'impri- 
mante inconnus, 


IMPRIMANTE RAPIDE 


se” 
LE 2 CETTE DEMO EST L'OEUVRE D'UNE HP 41 





CARACTERES ASCII "FRANCAIS" :  IM£SXET (ju+, —. /0123456789:; (=) 7àAE 
SETS DE CARACT. DISFON. : U.S. — HRITISH - GERMAN - FRENCH - SYE 


CARACTERES GRAPHIQUES + 4 Pablo SM à Pen 


16,5 CRRACTERES PAR POUCE 1à CARACTERES 8,3 CARACTERES 
VITESSE 12@ CPS 
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PAPIER z: LARGEUR MAXI 408 M/M, PERFORE CAROLE OU FEUILLE À FEUILLE 
ENTRAINEMENT =  FRICTION + PERF. CARDOLL 


INTERFACES STANDARD =  PARALLELE CENTRONICS + HBIL + SERIE :208 BPS 


BE-01-4K : Implantation Mecanique INTERFACES OPTIONNELS : RS 232 C HIGH-SPEED 9608 SPS - IEEE 498 
CABLE # FONCTIONS DISPONIBLES * 
— POUR CONTROLEUR H9IL — 
VUE DE FACE TRACE YODE TRACE : CATALOGUES, MISE AU POINT DE PROGRAMMES. 
me ES » 1 NORM  AOLE NORM : FONCTIONS ENDIR, ET IMPRESSION DES INTROS CLAVIER. 


MAN *CDE SERMETTANT L'UTILISATION DES FONCTIONS DE BASE : PRA, PRKEYS, PRPLOT, ACA, ETC... 


AUTO  0DE PERMETTANT L'ACCES A TOUS LES PERIPHERIQUES DE LA BOUCLE 
ee 4pTL,- CE MODE W' IMPRIME NI LES INTROS CLAVIER, NI LES PROMPT, 
NI LES AVIEN.- LES FONCTIONS DE CE SYSTEME OCCASIONNENT SELLES L' IMPSESSION. - 
= LE MODE AUTO COMMENTE PAR CONTROLER LE RON ACCES BOUCLE/ IMPRIMANTE, 
FEMELLE BAISSE LE FLAS 95 OQUR ACCELERER LA VITESSE DE TAAITEMENT, ET PLACE 


TE LA BCUCLE EN 2OSITION AUTOIC JEXMETTANT L'ACCES À TOUS LES PERIDHERIQUES. - 
#20 - CTILISEZ LA FONCTION AUTO A CHAQUE WISE SOUS TENSION, 27 S1 POSSIBLE 
nr EN DEBUT DE CHAQUE PROGRAMME QUI UTILISE LES GERVICES DE L' IMPRIMANTE, - 
— APRES L'UTILISATION DES MODES TRACE, NORM, OÙ MAN, 2TEINDRE LE 
PPC-T NH 3 CALCULATEUR, LE RALLLMER ET CXECUTER AUTO. - 
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{ HAUTEUR LIGNES PAPIER } 

REG. X : NOMBRE DE LIGNES CORRESPONDANT À LA HAUTEUR DU PAPIER UTILISE. - 
LA FONCTION HLP OCCASIONNE UN SAUT OU PARIER FOUR MEMORISER L'EMPLACEMENT 
DE LA SRENIERE LIGNE. - 

- APRES CE SAUT, REBLER LE PAPIER A LA PREMICRE LIGNE À IAPRIMER. - 
EFFECTUER CE POSITIONNEMENT SANS TOUCHER AUX POUSSOINS DE CONTROLE, - 


HLR 


p$& { PRINT ALEHA } 
REG. ALOHA : TEXTE à IMPRIMER. 
RES, X : NUM, COLONNE DE MISE EN PAGE. 
- ST X=9 .., LE TEXTE SEA IMPRIME A LA !ERE POSITION LIBRE SUR LA LIS 
- SI X(9 .… SERA IMPRIME À PARTIR DE LA COLONNE 1. 
- SI 120... SERA IMPRIME JUSQU'A LA COLONNE K. 
PLS { PRINT LIGNE ALPHA } 
CETTE FONCTION SEMBLABLE A D$, SIGNALE EN PLUS QUE LA LIGNE EST FINIE.- 
PRE ( PRINT RECCRD } 
CETTE ECNCTT 
- £1 X=0 ... A LA SREMIERE 20SITION LIBRE SUR LA LIGKE, 
- SI {8 ... A PARTIR SE LA COLONNE K. 
PFL { PRINT FILE ) 
CETTE FONCTION IMPRIME LE FICHIER À PARTIR DE LA POSITION DU POINTEUR ASCII. - 
- L!IMPRESSION COMMENCE À LA :ERE POSITION LIBRE DE LA LIGNE. - 
- UN INTERLIGNE EST EFFECTLE A LA FIN DE CHAQUE RECORD. - 


( LGINES } 
EG, X : NOMBRE D'INTERLIGNES. - 


LIN 


PAG SAUT DE FIN DE FIN DE SAGE. POGITIONNEMENT DU PAPIER A LA ÎERE LIGNE PAGE SUIVANTE. - 


TAB 2E6. X : NUMERO OU 2ORAGRAFHE A ATTEINDRE, - 


LES 2 FONCTIONS DRECEDENTES SIENALENT AUSSI QUE LA LIGNE EVENTUELLEMENT EN COURS EST TERMINEE. - 


SF 12 DURE LARGEUR DE CARADTERSS, - 
SF 13 SENI-AEDUCTION JE CAARCTERES ( 16,8 CARRCTERES/POLEE } 
INTRALUDE 


153 Av du Général Leclerc 
92340 Bourg La Reine 


Maï2ine, Monsieur, 


Nora Sociétés, spécialise dans la formation à l'In- 
fornatique, Gcganiss chagus trimoctss des séminaires de 
Énrmatiso à l'utilisation des calculatezss praonrene-h ss 


Nous avon15 Le plaisir de vous adresser une Jescrip- 
tion des stages que nous proposons sur les Calcu'ateurs 
Prejranmnanles de coche HEWLETT-PACXARD 41C/CV. 

— INITIATION À LA PROGRAMMATION 

- ADDROCFCNOISSIMENT DE LA PROGRAMMATION 

— PRATIQUE DE LA GESTION Dé FLcnstxs 


ILISATION D5 LA BOUCLE D'INTIRFACE 


(HP-12) 


Vous trouvar2z le progranne de ces stages pou: 
l'année 1983, et leurs mcdali:$s d'organisation. 


Nous restons à votre entière disvosition pour 


tout renseignement qui vous serait utile, et nous vous 
prions de croire, Madame, Monsieur, à notre consid‘ration 
BnDies Son 
Madame C. LEMERLE 
Responsable des Stages 
TOPOGRAPHIE: 


Nous avons depuis peu parmi nos adhérents 
Y. Alajouanine qui d'aprés ce que j'ai compris tra- 
vaille pour KERN/WILD et occupe les fonctions de pré- 
sident régional de l'Association Française de topogra- 
phie de Lyon. (108 bis rue Hénon 69004 LYON). 

Cette association diffuse des logiciels 
pour Ti59 et HP41C qui semblent trés intéressants. 

De plus j'ai appris la commercialisation 
(prix non comuniqué) d'un interface spécial pour HP- 
41C fabriqué par KERN et donc vous trouverez çi- des- 
sous quelques éléments de description. 


Au moment de faire la mise en page je ne 
parviens plus à mettre la main sur La notice de L'in- 
terface KERN pour HP-41C. Ce n'est pas trés grave, 
vous aurez l'original che Mr Alajouantine. Le plus beau 
de la notice est une photo en couleur que je ne pou- 
vats bien sûr pas reproduire. 

En deux mots 11 s'agit d'un interface entre 
une 41C et un théodolite électronique. L'interface a 
La forme d'une botte de la taille de la 41C et se place: 
sous celle-ct à laquelle il est fixé solidement. Il 
comporte une partie rigide empruntée au lecteur de 
cartes et qui utilise l'emplacement de celui-ci. 

L'interface lui même est fixé sur Le théo- 
dolite (orthographe non garantie) et l'ensemble fôrme 
donc un bloc compacte. Par cet interface les données 
sont transmises à la 41C qui effectue Les calculs. 

Il est question dans la notice d'interface 
RS232, je ne sais pas st il est compris dans lL'inter- 


IMPRIME LE RECORD 4 PORTIR DE LA SOSITION DU POINTEUR DANS LE FICHIER asc 2Ce KERN ou si c'est celut de HP -IL dont il s'agit. 


D'aprés les photos la fabrication semble 
tout à fait dans La norme habituelle KERN, c'est à 
dire comparable au standard HP. Je soupçonne Le prix 
d'être impressionnant, mats quand on a l'usage d'un 
apparetl ausst coûteux qu'un théodolite électront- 
que, l'avantage de l'ordinateur incorporé doit valoir 
le coût... 

J'ignore tout de la façon dont se font Les 
liaisons. Je suis curteux de savoir st un ROM a été 
créé pour cela ou st tout se passe au niveau binaire 
ou... C'est peut-être encore plus simple. Le micro- 
code devrait faire des ravages dans ce genre d'appii- 
cations st quelqu'un d'assez fort s'y attelle . 


* * 


DIVERS 
APPEL _: 


Certains modules HP des bibltothéques de 
programmes comportent quelques fonctions en microcode. 

Il serait pour moi trés utile d'en fatre 
bénéficier tout le monde via TR. 

Je cherche done un propriétaire de ces ROM 
qui accepteratt de me les préter une semaine. Retour 
recommandé avec remboursement des frais d'envoi. Vous 
rendriez à tous un grand service. 

Ces ROM's sont à ma connaissance: 

REAL EST 1B: START , CLK 

MACHINE 1A: FCON, BCON 

THRML IA : -SI, SI- (m'intéresse beaucoup) 

PETROL 1B: CZ, CCR, CON, INCON 

Ces fonctions sont facile à reconnaitre 
car elles sont beaucoup plus rapides que les autres, 
s'inscrivent en programme sans étre précédées d'XEQ 
et sont listées par CAT 2 sans ". 

Meret 


CLASSEURS DE CARTES: 


Sont maintenant disponibles des classeurs 
de cartes magnétiques de faible encombrement: bande 
de plastique munie de 10 fois 4 emplacements pour car- 
tes. On met facilement 4 ou 5 cartes par emplacement 
(tout un programme). La bande plastique peut êre pli- 
ée par 4 cartes en accordéon ou par 8 cartes. Elle P 
peut aussi être découpée et les emplacements pour car- 
tes scotchés sur une feuille de classeur contenant le 
commentaire. 

C8 Classeur de cartes 20 F + ET 1,80 

Les cartes magnétiques seront dorénavant 
fournies avec ces classeurs 

C7 cartes magnétiques HP avec classeur 
80 cartes 250 F (franco). 


TROMPER LE LECTEUR DE CARTES 


Le test qui permet au lecteur de cartes de 
savoir quel programme il est en train de lire n'est 
autre que la somme de controle du programme. On peu 
donc échanger les cartes de même numéro de programmes. 
ayant la même somme de controle. Il semble même que 
cette somme de controle ne compte que le nombre d'oc- 
tets du programme et que l'on puisse donc mélanger des 
programmes de même longeur. 


U.P.L.E.: 


La bibliothéque de Genéve charge d'adresse: 
Hewlett-Packard - UPLE 150 route du Nant-d'Avril 
1217 MEYRIN 2 
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LES LIVRES 4 


AF, SP, CTR et les autres... 





L'édition étant en plein développement il 
n'est pas inutile de faïre un petit tour d'horizon. 

Comme, d'aprés Figaro, sans critique il 
n'est pas d'éloge flatteur, je vais laisser de côté 
les éloges et faire la part belle aux critiques. 

Comme auteur de l'un des livres je récla- 
me le droit à la partialité; je publierai volontier 
les critiques venues d'ailleurs si j'en reçois. J'ai 
le gros avantage sur mes ‘"concurents" de pouvoir faire 
des modifications au fil des éditions (trés rare chez 
les américains). 


Au Fond de la HP-41C 


Ce livre se veut ouvrage de référence pour 
les programmeurs désireux d'aborder toutes les facet- 
tes de leur machine. Comme tel il comporte peu de 
programmes d'application, et son aspect est un peu 
rébarbatif. C'est un peu un "aide mémoire du program- 
meur " comme il y a un "aide mémoire du dessinateur", 

Ce livre a été écrit vite (trop vite), même 
si cela correspond à plusieurs mois de travail. La 
prétention à vouloir corriger les fautes d'une édition 
à l'autre est génante pour les acheteurs de la première 
édition, obligés de découper des articles du journal 
pour compléter leur livre. 

Ce livre est aussi un délice pour profes 
seur de français en mal de correction de copie et le 
nombre de fautes d'orthographe n'a d'égal que celui 
des fautes de frappe. 

Les explications ne sont pas d'une clarté 
absolue, contrairement à ce que pense l'auteur, quand 
elles ne sont pas absentes. Enfin le papier n'est pas 
assez épais pour que l'épaisseur du livre justifie son 
prix èlevé. 

Permettez moi quand même de penser qu'il 
constitue bien la référence qui était indispensable 
au club. 


Auteur: J.D. Dodin prix: 80 F pour les adhérents + 
10 F de port ou une enveloppe timbrée à 8,50(chéque 


à l'ordre de l'auteur, merci) 


Synthetic Programming on the HP-41C: 


Le précurseur. Malgré les (2!) ans et l'eau 
qui est passée sous les ponts il reste encore trés 
intéressant. Pour tous ceux qui ne possédent pas le 
PPC ROM et n'envisagent pas de l'acheter c'est en- 
core aujourd'hui l'ouvrage le plus complet sur la pro- 
grammation synthétique, en particulier par le nombre 
de programmes publiés. 

Si il se 1it facilement, il est par contre 
pratiquement impossible de s'en servir comme ouvrage 


de référence , les renseignements étant trés difficiles 
à localiser au milieu du texte. IL m'est déja arrivé 
de passer plusieurs heures à feuilleter ce livre sans 
y trouver ce que je cherchais. Les méthodes de pro- 
grammation sont totalement périmées mais gardent un 
parfum d'aventure qui peut permettre aux nouvaux venus 
d'éprouver ce que nous ressentions lors des balbutie- 
ments (nous sommes en pleine nostalgie!). Hélas il est 
en Anglais ( et même en américain) et il n'est pas 
possible d'en publier une traduction. Pour les toulou- 
sains capables de déchiffrer mon écriture, j'ai un 
manuscrit assez complet que je peux préter. 

auteur: William Wickes éditeur:(le mêne)LARKEN pu- 
blications 4517 N.W. Queens Ave. Corvallis Oregon 
97330 USA prix (adhérents) $11 port payé air. 

pas d'importation prévue par le club 


Calculator Tips and Routines: 


Digne successeur de "Better programming 
the HP 67", ce livre fait le point des astuces trou- 
vées aprés un an et demi d'usage de la 41C. Jamais 
remis à jour il est devenu incomplet. De plus la moi- 
tié du livre est consacré à des routines qui ont en- 
suite pris place dans le PPC ROM et sont bien mieux 
décrites dans le manuel de ce dernier. De plus 1'ab- 
sence presque compléte de description des modalités 
de la programmation synthétique rendent sa lecture 
difficile à ceux qui n'ont pas le livre de Wickes. 

Le néophyte y trouvera cependant une mine 
d'astuces qui amélioreront considérablement son habi- 
leté programmatrice. Ce livre reste la meilleure vente 
de la coopérative du club pour les ouvrages américains. 

Sa composition, trés claire et le peu de 
texte rendent son approche facile même à celui qui 
a'a qu'un anglais scolaire. Par contre son succés 


rend le délai de fourniture trés long. Tout vient à 
Points se 
Auteur: John Dearing prix 120 F (+ET 8,50) 


HP _41C System Dictionnary 


Toutes les fonctions HP et leur usage. 
Substitut avantageux des "user manual" officiels il 
semble que par suite d'un conflit entre l'auteur et 
l'éditeur ce livre ne soit plus réédité. 

C'était pourtant une magnifique publicité 
pour les accessoires HP, l'examen des fonctions de 
l'interface vidéo m'a fait baver d'envie, sans parler 
de celles du module Time. 

Ce livre était précieux pour celui qui, ne 
possédant pas un accessoire, voulait néammoins utili- 
ser un programme en faisant usage. On peut ainsi adap- 
ter au lecteur de cartes un programme pour cassettes 
ou pour l'affichage un programme pour imprimante, pour- 
vu que l'utilisation n'en soit pas trop spécifique. 

Ceci dit, il contient des erreurs dont cer- 
taines ont été signalées dans ces colonnes et qui 
sont parfois catastrophiques. 

Auteur: Cary Reïnstein non disponible (en anglais) 


Curve Fitting 


Autant les autres ouvrages sont utiles à 
tous, autant celui-ci est spécialisé. IL traite des 
“"lissages" de courbes à partir d'une série de points. 

Ii couvre des courbes inhabituelles, mais 
ne traite à peu prés pas des polynomes et des régres- 
sions à plusieurs variables (sujet abordé dans PPC 
USA récemment). On a un peu l'impression que l'auteur 
a mis beaucoup de blanc autour de ses textes pour gon- 
fler le nombre de pages. Devrait néammoins intéresser 
les spécialistes. 
Auteur: William Kolb 


Synthetic programming made easy 


Le dernier né des livres sur la programma- 
tion synthétique, décrit le traitement maintenant bien 
connu par le byte Grabber. Il est complet et souvent 
astucieux mais incroyablement touffu et embrouillé. 

Une chatte n'y retrouverait pas ses petits. 

Il perd un espace précieux à expliquer de 
façon incompréhensible ce qui est trés bien expliqué 
dans le manuel du PPC ROM (concernant les programmes 
du ROM). 


prix 10Q F (E.T. 8,50) 


Pour ceux qué l'anglais n'effraie pas et 
qui veulent se perfectionner. Ce livre est écrit par 
le réalisateur des cartes de codes en couleur et li- 
vré avec une telle carte. 

Auteur: Keith Jarett prix $20, en commande.prix 
sans doute 150F disponible d'ici un mois 


Programmer HP 41 


Le premier livre écrit en francais sur notre 
enfant chérie. Je n'ai pas étudié l'édition finale que 
j'ai cependant feuilletée en magasin. 

L'impression globale est une certaine dé- 
ception. IL n'y est pas question de synthétiques, et 
ce n'est pas un reproche. Mais la programmation elle 
même n'est abordée que de façon sommaire, sans que 
soient précisées les méthodes appliquées pour arriver 
à ce résultat. Les programmes eux même ne sont guére 
utilisables comme sous programmes, il faut les inté- 
grer à son propre programme pour qu'ils ne soient pas 
trop lents. D'autres volumes sont annoncés, attendons 
pour voir 
Auteur:Philippe Descamps et Jean-Jacques Dhenin, en 
vente partout. 


Le manuel du PPC ROM: 


Wonder full, but in english! Hélas si ce 
problëême de langue n'existait pas! Ce manuel dont le 
prix est évalué à 300 F pour 500 pages au format d'é- 
criture de PPC-T, soient 1000 pages ordinaires est 
une mine d'or. Tout y est sur la programmation syn- 
thétique, ou presque, c'est un chef d'oeuvre. Le ROM 
lui-même a quelques défauts, en particulier liés aux 
accessoires sortis depuis par HP (Horloge...) mais je 
ne vois pas de défauts au manuel. À lui seul il vaut 


l'achat du ROM! 

auteur: ouvrage collectif oeuvre de PPC international, 
prix avec le ROM environ 800 F, bulletin de commande 
(aux USA) sur demande. 


Le futur: 


On annonce beaucoup de chose en France, mais 
je suis dubitatif quand à la qualité. Je ne pense pas 
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qu'il soit possible de faire un bon travail seul sur 


un sujet aussi complexe. On me dit que le chapitre de 
Paris travaille depuis plusieurs mois sur un livre, 
tout ce que je constate c'est que le dit chapitre ne 
répond pas aux lettres (je n'ai plus de nouvelles di- 
rectes de Lionel Ancelet depuis l'envoi cet été du 
programme LB, il n'a pas répondu quand je lui ai de- 
mandé son accord pour la publication de son programme 
dans "AU FOND" ni quand je lui ai envoyé un spécimen 
dudit livre), ils travaillent peut &tre trop sur le 
livre ? 

En fait il me semble que la boucle HP-IL 
et les X-mémoires est le sujet tout trouvé d'un ouvra- 
ge, mais les renseignement à ce sujet sont récents, 
le sujet lui mêne difficile et les vrais spécialistes 
sont rares. Un ouvrage en collaboration permettrai 
peu-être une sortie. Il y a beaucoup à faire et à di- 
re, et beaucoup de pédagogie à avoir. Il y a aussi 
de l'argent à gagner car l'HP-IL est promise à un a- 
venir trés important, bien au delà de la 41C. 

La 41C elle même ne semble pas devoir être 
remplacé ni avoir de concurrente dans son domaine ce 
qui lui assure au moiîns dix ans de vie, sa compétiti- 
vité étant assurée par des baisses de prix successives 
(elle a baissé aux USA, le saviez-vous?) 

Je demande a tous ceux qui envisagent de 
publier de me contacter, au besoin confidentiellement, 
inutile de sortir plusieurs livres sur le même sujet! 


+ 


HP 15C HP 15C HP 15C 

Bonjour, 

Avant tout, toutes mes excuses pour être 
si lent à répondre, surtout si ma machine t'intéresse 
alors, passons de suite dans le vif du sujet: le HP 
15C est une super machine scientifique: Matrices, com- 
plexes, intégrales,Solve, le tout agrémenté d'une mé- 
moire assez large: elle a des chances d'avoir du suc- 
cé sauprés des scientifiques, surtout qu'elle tient dans 
la poche (personnellement je l'ai toujours sur moi). 

Par exemple, dans ma classe (je suis en 
Math sup) j'étais le premier à l'avoir. Moins d'une 
semaine aprés nous étions deux, et actuellement une 
troisiéme va peut-être faire son apparition. 

Du point de vue utilisation, les touches 
sont trés agréables: à déclic et douces. L regret: la 
disposition de CLEAR REG, trop facile à atteindre 
par erreur. Gare aux catastrophes! 

Les instructions de programmes apparaissent 
sous forme de codes numériques, ce n'est pas trés gé- 
nant, on a vite fait de les repérer sur 4 lignes et 

10 colonnes. 

La fléche à gauche de correction est trés 
pratique: j'ai définitivement oublié CLX. Une fonc 
tion Clear pile serait peut-être utile. Côté program- 
mation, les insertions et suppressions de lignes sont 
trés aisées; les branchements se font uniquement sur 
des Labels, on en dispose de 25. De plus, chaque 1la- 
bel peut-être utilisé plusieurs fois, et il faut sa- 
voir que la machine effectue sa recherche à partir de 
la ligne où elle se trouve. On dispose de 12 tests 


dont certains fonctionnent aussi pour les complexes 
et les matrices: intéressant! 

La mémoire est répartie ainsi : les regis- 
tres O et 1, ainsi que I(pour l'adressage indirect) 
sont indestructibles. Les registres suivants peuvent 
être créés ou supprimés par la fonction DIM. Ensuite 
vient la zone commune “matrice, Solve ou Integrate" 
en cours, et pas de programme; à noter: la numéro- 
tation est automatique, c'est à dire que le pas x 
n'existe pas avant d'être utilisé. L'aide mémoire au 
dos est une bonne idée, et la documentation (presque 
300 pages) est, je trouve, pas mal faite. 

Passons maintenant à ce que le manuel ne 
dit pas. Je précise qu'il est possible qu'il y ai 
des erreurs! je suis encore novicé en La matière! 

Tout d'abord l'organisation d'un registre. 

Les 7 octets semblent être répartis comme 
suit: 
demi octet de signe:l demi octet par chiffre des 10 
chiffres de mantisse: un demi octet de signe de l'ex- 
posant:un demi octet par chiffre de l'exposant. 
les signes sont O pour +, 9 pour -, si l'exposant est 
négatif ce sont les chiffres du complément ä 100 qui 
y figurent {toutes les HP ont cette disposttion) 
le signe est à 1 (0001) pour le “label''d'une matrice. 
Les labels des matrices sont identifiées par le premier 
demi-octet de chiffre, il y a donc 16 matrices (14 st 
O0 et 9 sont utilisés pour le signe?) 

Une pression simultanée sur les touches ON 
et y°x ou x provoque une rotation circulaire de 
22 bits dans le registre x. On peut donc faire ap- 


paraitre une matrice autre que les 5 normales. La pro- 
cédure la plus simple consiste à faire e°x, puis 2 dé- 

calages: on voit apparaitre la matrice y, dimensionnée 

comme À. La seule différence est qu'elle est constitu- 

ée d'une partie des registres internes. On dimensionne 

A au maximum, du type 1 ligne.x colonnes: c'est le plus 
simple. 

Avant tout le plan de La mémoire: 


voie tableur. 


La matrice y commence au ...+. 

la Zone intéressante contient le registre y 
(numéroté 1) puis z(2) T(3) ....R@(17), R1(18),I(19) 
LST X(20) en 26 et 27 : les dimensions de matrices: 
L'octet(2chiffres) pour chaque dimension, c'est à 
dire 


13 1& nu æ 3 8 # 6 5 #$ 3 2 4 0 


LR NERERRRSENRRSS 


Din A Din & Dinc 


#4  LICELELELELELS. 


DIM D Din & # Ta dé aÆucs 
rsu fat binaires 


Je mets en 27 le nombre 1,016363... 
ce qui dimensionne D à Ixl et E à 99x99 car la machine 
comprend les nombres des registres comme des nombres 
hexadécimaux, qu'elle traduit, Ces registres permettent 
aussi de voir quelles sont toutes les matrices: le 
demi-octet aprés la dimension de E contient la matrice 
résultat. Il suffit donc d'y mettre un nombre, puis 
par 1 RCL RESULT, on obtient la matrice correspondante. 

La matrice E 99-99 se comporte comme la 
matrice y. Personnellement, ma matrice E est en per- 
manence dimensionnée à 99x99: ça ne me gène pas, les 
autres matrices me suffisent, et de cette façon je li- 
bére I . j'ai oublié de préciser que pour avoir ac- 
cés à la matrice y, il faut la ranger dans I, puis 
faire RCL(i), ou STO(i), comme avec toute autre matri- 
ce. 

Pendant que j'en suis aux oublis, je préci- 
se que RCL ou STO suivi d'une matrice travaille sur 
l'élément de la niéême ligne et de la pième colonne, 
où n est le contenu de R(O) et p celui de Rl 

Intéress ons nous maintenantà la zone pro- 
gramme. Les registres de la matrice correspondant à 
cette zone contiennent, en langage machine hexadéci- 
mal, les instructions. Pour les lire: il faut voir la 
mantisse. Dans celle-çi: 


r=fRtde); — > GCM) ; à > CUT); pBz= DG3); EzE ; zFUS) 
attention, on lit en quelque sorte à l'envers. C'est 
à dire, par exemple, si on lit: 
EB1C8A5677 et exposant98 il y a deux inconnues: les 


deux signes. On peut les voir par plusieurs rotations 
de x (2 fois 22 bits= 44 bits, il y a simplement ro- 
tation des demi octets, qui changent de place et gar- 
dent la même valeur). On a cependant un probléme avec 
l'exposant. 

Revenons à l'exemple: 
pour code 98 

le second 7.7, le 3° 67 etc... 

et en fait la machine les lit donc dans le sens 89 
075165: + 

Sur le tableau des codes que j'envoie ci-joint, j ‘ai 
choisi de représenter les codes comme on les lit, en 
gardant conscience de la différence. 

Exemple: SIN a comme code réel 7C, lu C7; de même 
les codes à 2 octets: EF,FF sont des précodes. 

: Il y a encore pas mal d'investigations à 
faire du côté des codes à 2 octets; c'est à dire es- 
sayer d'en créer. J'ai deux méthodes: la rotation cir- 
culaire de x ou, plus rapide, mais pas toujours possible 
jouer avec la dimension des matrices: stocker un co- 
de 2 octets déja existant "à cheval" sur 2 matrices, 
puis redimensionner une des matrices de façon nor- 
male. 


le premier pas de programme a 


pour 


Tu pourras peut-être voir sur les photo- 
copies que je t'envoie les essais que j'ai fais. Les 
résultats sont assez faibles: par exemple FIX A,B,C, 
D,E ou F est considéré comme FIX O0. Les précodes du 
type 1F sont soit ignorés soit considérés comme étant 
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PQ 8e GF RcLEXIPX CF  STO+ X|SX DF DSE.x 
JA68F Rect.XI3X CF  Sto+,Y|4X DF  [sG Y% 
me RC TAL LP Sro- XIAx OF 156. 
2 Ra-.xlex cr Sro-.xlBxkor :-*. 
[+ #tüx À CX cF  Strox X |CX DF 
Rctx.XIDX CF Srox.X|DX or 
Ras XIEX CF STos XIEX or 


es Re .XIEX CF Sros.XlFx 06 


JO où st! mntes" pu st 


bo 


JX EF ENG X |3xFF 
3XEF MATREXIOXFF 


cle es FR 
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AXEF  STonmx|AXFF 
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LE COIN DES 
J=P HALLES . DEBUTANTS 


(T 41) Cuizans , le 6/11/1982 


Cher Monsieur Dodin , 


Ce petit mot pour vous faire part d'une commande et aussi 
terminer ma lettre de l'autre fois , à propos des lignes 
synthétiques alpha-numériques . 
Merci de bien vouloir m'envoyer : 
C3 __10 overlays perforés ( 30F + 1,60F ) 
CT __ 100 cartes magnétiques ( 200F ) . 


Pour en revenir aux lignes synthetiques A.N. , puisque 
celà semble interesser des membres du club , voilà en 
gros comment on peut s'y prendre : 

Il y a deux façons , selon que l'on dispose ou non 
d'un programme de chargement d'octets , comme celui de 
Lionel Ancelet dans PPC-T n°1 ( Sept-Oct. 82 ) , ou 
le "LOAD BYTE" de Keith Jarett dans PPC VIN10P21 (Dec. 80) 

1) Si l'on possède un de ces programmes , le problème 
ne se pose plus , mais le malheur est que ces programmes 
contiennent eux-mêmes des lignes synthétiques , alors ...? 

2) En utilisant le Byte Jumper , on peut tourner la 
difficulté : les manipulations pourront paraître fastidieu- 
-ses , sans doute en existe-t-il de meilleures , mais 
celles-ci marchent bien . 


Le programme “ LB “ de Lionel Ancelet contient les lignes 
13 , 45 ,; 48 , 97 et 99 qui sont des lignes synthétiques 
et qui peuvent ainsi présenter une difficulté : 


13 8 "+é60" soit : F4 7F 96 #9 #9 ( codes HEX ) 
45 # "O+“i " soit : F4 19 99 91 69 

48 = ligne 13 

97 "re" soit : F2 7F 99 

99 = ligne 97 


Commençons par la ligne 13 
taper : 91 LBL TLEB 
gÿ2 STO ÿ1 
993 THABC 
JUMP #93 voir CLD , puis taper ÿ# et 
+ (touche de correction }) 
GTO .993 et on obtient ainsi la ligne 


désirée +. 

Rappelons ici que les losanges noirs + sont la représenta- 
tion de l'imprimante pour le "“ NULL " , affiché ” sur 

la HP 41C . 

Les lignes 97 et 99 se créent de la même façon , en 
modifiant seulement la ligne #93 en #ÿ3 TrA 


La ligne 45 est plus interressante : elle fait partie 
des lignes pour lesquelles il est beaucoup plus facile 
d'utiliser une technique de chargement des octets par un 
programme , en l'occurence , le programme " CODE " de 
William Wickes , en association avec le Q-—LOADER . 

L'objet du programme CODE est de charger dans les registres 
X et M les bytes correspondant aux 7 codes HEX , introduits 
en début de programme , et ainsi de changer le code #1 

en +ou 7F en + . 

Une fois le code en X et en M , on va pouvoir , avec 

les instructions STO Q et Q-LOADER , insérer dans 

notre programme la ligne alpha-numérique synthétique créée 
par le programme CODE , dans l'ordre inverse ! 

Voici un exemple qui montre cette remarquable possibilité : 


Création de la ligne 45 : "@éxi" ( F4 19 99 g1 69) 


Précisons d'abord que STO Q est XROM ÿ#5,57 
ou décimal (145,121) 


et que Q-LOADER a pour code XROM “OD" 
ou décimal (4,25) 
On supposera également que tout le monde est en possession 
du programme CODE et du Q-LOADER assigné à une touche 
utilisateur .Exécuter la séquence suivante : 
en mode PRGM : #1 LBLTLB puis sortir de mode 
PRCM . XEQ "CODE" : affichage = CODE ? 
introduire en restant en mode ALPHA et donc en shiftant 
les touches pour les chiffres : 
29 99 99 69 91 96 19 
pendant l'exécution du PRGM CODE les indicateurs au bas 
de l'affichage clignotent mais à la fin , l'état initial 
des flags est restauré ; on voit enfin à l'affichage : 


ax 4 faire ensuite : GTO."LB" 
STO Q 
passer en mode PRGM 
Q=LOADER (OD) : 9 à 
l'affichage 
DEL g91 voir LBL” LB 
SST voir T#H7x# 
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Et voilà ! La fameuse ligne est donc créée , et on 
fabriquerait de même n'importe quelle ligne , il suffit 
d'en connaître le code HEX . Comme toujours , l'ordre des 
instructions doit être impérativement suivi , et à partir 
de ce moment , vous êtes en possession du programme de 
Lionel Ancelet ( "LB" ) ou de celui de Keith Jarett , 
qui se chargeront à l'avenir de créer pour vous toutes 
les lignes synthétiques ou instructions dont vous avez 
toujours rêvé.... 

NB. Le programme " CODE " ne contient lui-même que des 
instructions synthétiques du type RCL N ou X@ d que j'ai 
explicitées dans PPC-T n°2 . 

11 ne devrait donc subsister aucun problème . 


Va SARL mor qui comme moi possèdent ou ont 


possédé une HP 25 ( une des premières programmables des HP) 
se souviennent peut-être de la dernière phrase du manuel 
d'utilisation : 

"Vous avez au bout des doigts un outil de travail 

qui n'existait pas du temps de Pascal , d'Archimède 

ou d'Einstein .Une des limites les plus certaines 

du HP 25 est la limite de votre propre imagination", 


Cette remarque prend tout son sens avec la HP 41C et la 
programmation synthétique ... 


Happy programming . 
J-P Hallès . T41 


*% * 


M CCE Aione 025 
1E7, Ru, Hi Ets 


Vaujours le,23:11:1982. 


D asie 


nt: 
vuste 


Tel:(1)8601345 
Cher J.Daniel, 


Durant une après midi pluvieuse du 
mois de movembre,j'ai été tenté d'approfondir mes con 
naissances en programmation synthétique. Mon calculateur 
était prét pour ce voyage dans l'autre dimension. J'avais 
quand même une petite idée dérrière la tête,le registre 
d allait devenir mon cheval de bataille. Tout le monde 
sait que ce registre permet de désarmer les drapeaux 
0à56, si son contenu est égal a zéro.Mais ma curiosité 
m'a poussé a aller rechercher autre chose,en moi ce 
registre devait surement cacher bien des secerts. 

J'ai donc crée un petit programme qui allait me permet- 
tre de faire quelques découvertes pas des moins intéres 
santes. 

Le programme est le suivant : 







Lbl A 
NOMBRE = ? 
PROMPT 
Sto d 
View d 
END. 








(On ne peut plus court ! ) 





Ceci m'a permis d'introduire une série de nombres dans 
le registre d et de voir ce que cela pouvait changer 
dans le comportement de mon 41CV. Aprés avoir introduit 
des dizaines de nombres les résultats se ressemblaient 
invariablement,le mode User s'éteignait,l'affichage des 
nombres entrés se faisait en notation scientifique,les 
drapeaux s'allumaient,s'éteignaient selon le nombre 
précèdement introduit,le mode Prgm et le mode Alpha en 
faisaient aussi a leur tête. Tout cela devenait d'une 
monotonie,mon calculateur me demandait toujours l'ine 
troduction d'un nombre,L'idée d'appuyer sur Pi me passa 
par la tête,je crois que là j'avais mis le doigt dans 
le mille. Devant mes yeux écarquillés défilait un cata 
log 3tout a fait extraordinaire.J'ai dénombré 117 
instructions toutes plus ou moins bizarres les unes 
par rapport aux autres,certaines n'étaient pas inconnues 
mais elles étaient tronquées ou avec un préfixe ou un 
sufixe supplèmentaire. Pour obtenir ce catalog 3 faire 
ce qui suit: Xeq À , le calculateur vous demande 
NOMBRE = ?pressez alors sur la tovohe Pi et R/S,alors 
3514159 00 apparait sur l'écran , appuyez à nouveau 
sur R/S et le défilement fou est parti. 

Vous allez trouver le tableau de ces 117 instru 
ctions ci-après. Il faut noter l'emplacement des signes 
sera égal a celui de l'écran de votre HP. 


Les instructions: 4,7,8,33,75,88,109et114 
ne sont pas représentées dans le tableau car rien 
n'apparait sur l'affichage,mais cependant une pose est 
observée lors du listage.Ces vides représentent des 
instructions SPACE . 


Etat du calculateur après l'affichage de ce catalog 3 
-Si le drapeau 27 (USER) est baissé lors du lancement 
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du programme A,celui-ci sera armé dés le début du cat 
alog 3 .5i il était armé,il sera baissé. 

“Le drapeau 26 sera automatiquement baissé,plus de 
signal sonore actif. Mais rassurez vous en eteignant 
votre calculateur tout reviendra dans l'ordre.dés la 
mise sous tension un TNE 7 retentira. 

-Les drapeaux 29,42,43 seront aussi désarmés. 

“Aucune modification des programmes en mémoire. 

-Les assignations ne sont pas modifiées. 

“Les drapeaux 40 et 41 sont baissés,ce qui implique 
une notation scientifique,cinq décimales accompagneront 
ce format d'affichage. 

“Le contenu de ALPHA est conservé et les registres de 
données sont également sauvés. 


Le plus important maintenant va être de trouver a quoi 
servent ces instructions.J'éspère que les lecteurs de 
PPC ne me laisseront pas seul devant ce nouveau calalog 
N'hesitez pas a m'écrire.Je receverai avec plaisir 
toutes vos trouvailles. 
On Os One Deus Dee Dons © 

En continuant mon invéstigation dans le 
registre d,celui-ci m'a permis de lui trouver un emploi 
interessant.Dans les premiers numéros de PPC-T ,vous 
aviez donné trois programmes synthètiques qui pressaient 
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la touche SHIFT pendant le déroulement d'un programme. 
Ces programmes étaient courts,mais ils demandaient une 
bonne connaissance de la programmation synthètique,car 
ces instructions synthètiques étaient le contenu majeur 
de ces trois programmes. Mais là,le registre d vient au 
secours des débutants en programmation synthètique,dont 
je fais parti. Vous trouverez ci-dessous le listing du 
programme qui pressera SHIFT a notre place,avec pour 
seule instruction synthètique "“Sto d". 


Lbl'SHIFT 
1 E-89 


Sto d 
End. 





Evidement ce programme pourra se voir gref 
fer quelques instructions supplèmentaires,pour permettre 
a l'utilisateur de remettre un peu d'ordre dans son HP. 
Ce programme désarme les drapeaux 26 (Signal sonore) 

27 Ho (Séparateur de groupe de trois chiffres), 
42 (Mode trigo "GRAD"),43 (Mode trigo "RAD"}.Par contre 
il arme le 44 (Inhibe l'auto-ertinction). 

» La pile opérationnelle n'est pas bouleversée, seul 
le registre T est perdu,car 1 E -89 est en X,ce qui 
implique obligatoirement une montée de la pile et perte 
de T.Rien de plus naturel en somme. 

… Les programmes et les assignations en mémoire ne 
seront pas modifiés. 

Beaucoup d'autres nombres permettent d'obtenir SHIFT, 
c'est a vous d'essayer de les trouver. 

En vous souhaitant de longues heures de 
programmation. 





X% Feacrions 


L2 Heathfield Road, 
London W3 8EJ 
Angleterre 
17-12-1982 


J-D Dodin, 

77 rue du Cagire, 
31100 Toulouse, 
FRANCE 


Cher M. Dodin, 


David Burch m'a montré votre livre - au Fond - et j'ai 
envie de l'acheter car c'est un livre tout a fait excellent. 
Je vous envoie donc un cheque pour 100 francs - c.a.d. 80 francs 
pour le livre car je suis membre 8498 de PPC , et je suis aussi 
membre de PPC-UK - j’ajoute 20 francs pour les frais de port 
et j’espére que ça va suffiræ car vous avez écrit dans la 
circulaire d'Octobre que les imprimés en Europe coutent le mâme 
qu’en France. 

David m’a montré aussi les journaux de PPC-T et je vais 
les résumer pour le journal anglais. Je n’ai pas pu trouver 
a qui il faut payer les cheques si je veux devenir membre de 
PPC-T = est'ce qu’il faut que les cheques 83 pour PEC=T , 
ou pour J-D Dodin , ou bien pour un autre nom ? 


directement a J=F Sibille ? 


Dois j’écrire 


Je m'excuse de mon francais qui n’est pas tellement bon 


q'autrefois,je vous remercie par avance et je vous souhaite un 


Joyeux Noel, 


: : 7 - ; 
Ndiadanunr VPkv Frepnies 
H.AeCeMier-Jedrze jowicz/8498,5H/ 


*%X * 
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PROGRAMMES 4 


Hazebrouck M 16-" 1332 


Cher dgezn-uariel, 


vu trouveras ci jir'nt le mcde 4'emnloi 3e la 
orograrmathèque, 2i anela:e cicse n'est 52s 11 
nt 


=. 


int fais-le voi savoir et je nourrai rectifisr 
par la suite. J'ai nett-vi les caractères de ne 
machine, aussi j'eserère qu'il n'y aura nas trov 
de problèmee pour la vhotccopies 

ï“erci rour le journal qui ne fait plaisir chaque 
fois au'il arrive, 

Serzit-il possible 4e rarser un article sur les 
registres internes de l+ calc'l:+rice, ceux 
auauelæ , théorioue”ent on n'= ras sccès? 

À moins que le livre que tu comrtes publier n'en 


rerle, 


joint un orogremme réalisé var Jacques 
ViïCELLs lors de son rassare à la maison durant 
ces de ‘“oursaint. 


IiVa retoume les chaînes alrhæ jusqu'à 24 
caractdres en n'utilisant qe la rile . Il re 
se sert ifsvcun des registres habituels de la 
41C. £ar contre il utilise le registre : et le 
refistre Q, lors du &iC IND X. 

UD=t3 s 4 est stocké en L 

L4=iC : ffcnurase de la chaîne à retourner 
11-2C : retourrevent de la ch2îfme 


on retourre un veristre de la vile à la 
TYUTS 


foie 0-r le STC IYZD Z Au pas 14 
. f 
21-75 : “ice en place a la craîfne retcurnée 


une contrainte pour le rorent ?: ne pas avoir en 
machine in vrorramme dont le label norte le 
nêre non au'ene des chafnes qui sera retournée 
Der GC Tu) a 

VYoil® se que ‘'ai covrir des comrentaires que 
drones m's faits, 


four rius tord f«i$ —--i conraftre la d°te lirite 
À Januelle mon texte doit te varvenir. 


incore gqguelaves commentaires sur les pas 11-20 : 
14 : GO l: XL iéfomate et inverse ne chaîne 
en utilisort le reai tre à 


15 2 C 
lo +: est Scransé 2vec le crntenu îe 9 

sn récurère la chafre inversée et déforratée 
17 : L 
1£ 2 la crafre nversée est reforrat<e, 
SI SAai fait me erreur dans les correntaires corri 
ge ca aq'ii ect niceseire, D'esat vour cela nue je 
derande un article sur les resistres internes, 


Ce nrorranre art slus rairide 91e le 11 paru ans 
AŸI rare 5 qui et ©,15 seconres vour 24 carrc- 
+$res tandis 7e :wva ve* 6,70 s. pour 4 car. 
Ulaar urcruies ri l'a var fi4 ayec le nodrle iime. 


ab 


…erci poux tout le -ravail que tn stats. 
Ju asraison Se rérobtir les +tfcree, 


Gris 4. dE 
sx TL CALE" ENT: 


AeLBL “IHYA" 
ÿ2 4 

83 ABS 

84 ASTO T 
85 ASHF 
86 ASTO 2 
87 ASHF 
48 ASTO ? 
89 ASHF 
18 ASTO x 
11eLBL 63 
12 Rt 

13 SF 25 
14 GTO IND à 
15 CLK 

16 XC> - 
17 570 L 
18 ASTO x 
19 DSE L 
28 GTO 43 
21 CLA 

82 ARCL & 
23 ARCL Ÿ 
24 ARCL 2 
25 ARCLT 
26 ENB 


Astucteux, l'ami Vaucelle! IL utilise la 
propriété de la HP qui, quand elle recherche un pro- 
gramme place le nom de ce programme en ordre inverse 
dans Le registre Q. Attention, st tl y a des nuls 
dans la chaine le programme démoli tout. 


Damien, st tu tapats sur du papier bten 
blane et avec un ruban de machine neuf, le résultat 
seratt metlleur! 


* * 


Je vous prie de trouver ci-joint 


2 programmes de FACTURATION 


le programme 0003 

prix de base TIC 

permet de différencier la TVA à 7% et celle à 18.60% 

( Les coéfficients des TVA peuvent être modifiés suivant ces taux. ) 


le programme 0004 

prix de base HT 

j'ai demandé un arrondi de 5 cts 

pour ne pas augmenter le prix 

suivant le résultat du calcul obtenu avec la TVA 


J'ai encore des prix bloqués avec une TVA à 17.60% 
mais le résultat doit correspondre à la TVA de 18.60 % 


C'est pourquoi dans ce programme, 
je peux choisir l'une des TVA 
soit que le prix est bloqué : TVA : 17.60% 


ou bien si c'est un article importé 
parce que dans ce cas, c'est la TVA à 18.60% qu'il faut appliquer. 


Ces coefficients de TVA peuvent être modifiés, 
ainsi que l'arrondi, 


Mais je dois améliorer encore ces programmes, 

pour les corrections des chiffres erronés. 

avec ces programmes, je ne trouve pas toujours le sous-total du dernier 
résultat, mais je pense que si l'on reprend la mémoire RCL O1 dans le 
programme 0004, on doit pouvoir rétablir la situation, 

mais c'est à vérifier. 

Si dans le programme 0004,j'ai mis un GTO O1, 

c'est pour le cas où le client achète au dernier moment lorsque la 
facture est demandée de pouvoir complèter cette facture. 


Cordialement votre. 
t 43 


Soyez gentil de joindre systématiquement 
des cartes magnétiques avec le programme, même quand 
il est tapé, cela me permet de vérifier, les fautes de 
frappe dans un programme, cela arrive à tout Le monde. 

Je n'ait pas le temps de taper le programme. 


Cela me permet ausst de le joindre à La 
bibliothéque de Damien. 
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0003 7435/36 Facturation 
avec Prix TTC: 2 TVA/1 PROG 
LAMY le 21 11 82 


TVA : —- 7%/1 ou -18.6%/2 
01 FRE 

02 CLRG 

3 CLST 

94 CF 27 

05 SF 21 

06 LEL O1 

G7 TVA -7/1 -18/2 
08 PROMPT 

09 STO 90 

19 VIEW X 

11 & = OO? 

12 GTO 02 

13 QUANTITE ? 
14 PROMPT 

15 MONTANT 

16 PROMPT 

L7 + 

18 SS/TOTAL= 
19 ARCL X 

20 AVIEW 

PR ADV 

22 RCL IND 00 
23 + 

24 STO IND 00 
25 GTO O1 

26 LBL 02 

27 X échange O1 
28 X = 0 ? 

29 GTO 03 

30 STO O1 

31 TVA 7 = 

32 ARCL X 

33 AVIEW 

34 RCL O1 

85 93457 

36 # 

37 AT = 7 = 
38 ARCL X 

39 AVIEW 


0004 7435/36 

Facture HT avec 2 TVA 
A= 17.60% - B= 18.60% 
RESULTAT AT = 18.60% 
LAMY 21 12 82 


9 2 TVA 
02 CLST 

93 CLRG 

94 FIX 2 
05 SF 21 
06 LBL C1 
97 SF 27 
98 TVA 17/A 18/B 
99 PROMPT 
19 LBL A 
ET L:176 
12 STO 03 
13 VIEW X 
14 CF 07 
15 KXEQ 05 
16 RTN 

17 LBL B 
18 1.186 
13 STO 03 
20 VIEW X 
el CE 27 
22 EXQ 05 
29 RTN 

24 LBL 05 
25 NB/PIECE/EMB 
26 PROMPT 
27 VIEW X 
28 x = O ? 
29 GTO 04 
30 CDE 

31 PROMPT 
32 VIEW X 
33 

34 PRIX/1000 
35 PROMPT 
36 1000 

37 / 

38 » 


40 
41 
42 
43 
44 
45 
46 
47 
48 
A9 
50 
SE 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
F4 


39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
SL 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
74 
72 
78 
74 
75 
76 
77 


RCL O1 
TVA/-7= 
ARCL X 
AVIEW 
CLX 

ADV 

X échange 02 
X = 0 ? 
GTO O4 
STO 02 
LBL 03 
TVA 18 = 
ARCL 02 
AVIEW 
RCL 02 
.8431702 
* 

HT -18- 
ARCL X 
AVIEW 
RCL 02 
TVA/-18-= 
ARCL X 
AVIEW 
LBL O4 
RCL O1 
RCL 02 
ADV 
TOTAL= 
ARCL X 
AVIEW 

CL X 

ADV 

ADV 

END 


RCL 03 
,05 


ENTER 
INT 
X=Y7? 
GTO 02 
INT 

1 

+ 

GTO 03 
LBL 02 
LBL 03 
STO O1 
PX SS.TOTAL= 
ARCL X 
AVIEW 
RCL O1 
ST + 02 
GTO 01 
GTO O5 
LEL 04 
RCL 02 
PX TOTAL= 
ARCL X 
AVIEW 

, 8431702 
* 

PX HT= 
ARCL X 
AVIEYW 
RCL 02 
TVA= 
ARCL X 
AVIEW 
GTO O1 
END 
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Tel (1) 8601345 


Cher Jean Daniel, 
Me revoici devant ma machine a écrire 


VAUJOURS Le,20/11/82 


pour proposer au lecteur de PPC un petit programme qui 
leur permettra de connaitre a tout instant l'état de 
leur calculateur favori. 


Le gros du programme est du a Mr. 


GARNIER J-F.qui a écrit un article dans l'OI de ce mois 
ci.J'y est éffectué quelques retouches d'ordre secon- 
daire, modification de l'appelation des Labels ,afficha- 
ge des résultats recherchés et enfin un Label supplèm- 
entaire permettant d'éffacer d'un seul coup tout les 
drapeaux, grace a la programmation synthétique et 
surtout au registre d. 


Ce progamme permet de connaitre et de 


modifier l'état du calculateur en utilisant aucun regi- 
stre de données,seule la pile opératonnelle rentre en 


jew 


1% Effacement des registres déterminés par la 
valeur de X (format ddd,fff) ou ddd représente La borne 
inférieure et fff la borne supérieure. 

2% Détermination de la taille mémoire utilisée, 


SIZE ??7? 


3% Connaitre quels drapeaux sont armés,a l'écran 
apparaitra le numèro des drapeaux armés sous la forme 


FS :XX 


4% Visualisation des registres spécifiés en X 


(format add,fff) 


5% Effacement des drapeaux Où 35. 
Ces cinq petits progammes trouveront certainement place 
dans votre table d'assignation.Le 1° est noté Lbl'CLRON 
le 2° Lbl'SIZE ?,le 3° Lbl'FLST ?,1e 4° Lb]J'VIREGN et le 
dernier Lbl'CLALFL . 
Passons maintenant au listing du programme. 


00 Lbl'CLRGN 


0 
Lbl 01 
Sto Ind Y 
ISG Y 
am 01 
CLx 
Fix 2 
RTN 

10 Lbl'SIZE ? 
6 
ABS 
XCTY 
SF 25 
Lbl 02 
XC7Y 
ST+L 
Rcl Ind L 
FS ? 25 

20 GTO 02 
1 
X=Y? 
GT 03 
XC7T 
STelL 
SF 25 


M44FTN FO 


AVIEW 
PSE 
CLD 


+ 
Arclx 
Fix 0 
AVIEW 
PSE 
GTO' CONT 
Lb1'YIRECN 
Fix 2 

70 CF 21 
Rcl à 
Lbl 05 
Fix O 
CLA 
"R 


GT 02 
Lb1 03 
Fix O 

30 CF 29 
TSIZE 0 
be 
Lastx 
Stox 
Arclx 
Aview 
RTN 
Lbl'CLALFL 
0 

40 Sto d 
RTN, 
Lbl FLST ? 


055 
Pix 0 
CF 29 
Lbl 04 
FS ? INDX 
GTO'TAFF 
GTO CONT 
5 Lbl'CONT 
ISG x 
GTO 04 


Explications du listing: 


0009 : Effacement des registres 
déterminés par la valeur de X 

10à37 : Determine le nombre de regi— 
stres de données. cette routine 
est un peu moins rapide que celle 
faisant appel a la programmation 
synthétique. 

38341 : Effacement des drapeaux 0a55 

42267 : Teste l'ensemble des 56 flags 
et affiche les drapeaux levés. 

68à89 : Cette routine permet de visua- 
liser un ensemble de registres 
spécifiés par la valeur de X. 


J'éspère que ce petit programme vous 
rendra de grands services. Pour ma 
part il est à jamais assigné dans mon 
calculateur. C'est toujours utile de 
connaitre a tout moment l'état de son 
calculateur. 


Arel Y Bonne programmation à tous 
-% Amicalement 


Sto d 
Arcl Ind Y 


PSE 

ISCT 

GT 05 

‘FIN LISTAGE 





PSE 
CLx 


89 END. 
* * 


Dison, le 13 novembre 1CE62, 


Cher “onsieur, 


Dans quelques semai- 
nes, le nouvel an sera là. Alors, osourquoi ne pas 
offrir à vos amis, à vos oarents ou à vous-même 
un calencrierz; mais pas n'importe lequel! Un ca- 
lendrier imprimé oar la HP-41 et son imprimante. 
Ce porocramme utilise le programme du calcul des 
dates (manuel d'applications HP, p.17- 20) comme 
sous-orocramme, cela a oour avantage de disposer 
de ? programmes dans la mémoire de la 41 (un qui 
calcule les dates et un qui imprime des calendri- 
ers)au lieu d'un seul (impression d'un calendrier 
). cet avantage sera d'autant apprécié si l'on 
possède une 41€ avec un ou deux nodules mémoire. 
Toutefois, le proqramme du calcul des dates devra 
être lécèrement mocifié pour faciliter son accès, 
les seuls labels existants étants numériaues ou 
alohabétigues courts (A à E). Cette modification 
n'altère en rien le bon fonctionnement du pro- 
gramre, 
jsici la liste des modifications: 

- Clacez-vous en mode calcul, 

- 5TC € (orocgramme du calcul des dates), 

— Flacez-vous en node pronramme, vous voyez à 
l'affichage: 133 LOL E , 


- Insérez LE & , e 

- Fressez S5ST © fais, vous voyez à l'affichage: 
1äé + , 

- Insérez LEL GC , 

- Srescez 3°T 1 fois, vous voyez à l'affichage: 
147 XEZ Inn € ; 

- Insérez FC?9C CÙ , 

= GTC <<. y PACKIRNG, 


Enreristrez le orocramme mocifié sur cartes 
na-nétioues ou sur cassette. 
srs-ranre orincioal, quant à lui contient plu— 


Le 

sieurs sous-oro7rammesi 

- Cali (inpression d'un CAilendrier pour une A— 
née dé terninée) imorime tous les mois de l'an- 
née. 

- CAL inorine le celendrier c'un mois. 


sst la version pro-ramnable ce CAL, c-à-d que 
vous Jouvez ex“cuter ie prooramne sans que la 
41 vous camancé l'année et le mois; ces données 
auront ét$ rancées au oréalaële dans R10 et R11 

Yoici la et or liane 9ar licne du proora- 


C=7C Introduction des cpnre 8Se 

11-75 Confiquration de affichage. 

74.30 Inoression cu nom it nois et ce l'année. 

31-47 Imoression des initiales des noms des jours 

&E£=2£ alcul du premier jour du nois considéré. 

27-62 Saut de caractères à la première ligne du 
calendrier. 

2C22C Cetece une année bissextile? ce calcul a 
lieu uniquement pour le mois de février 

21-104 Calcul du nonbre de jours dans le mois 
considéré. 

105-163 Contrôle ces conpteurs et inoression. 

154-7375 des comoteurs osour l'iroression 


Q. 
E 
{D 
1 
2 
=) 
9: 
D 


‘e comnlète. 
ue nécessaires: 1 nocule ménoire et une 


7 
imorinante, bien sûr. 





Un -2ouveau ua ? 

J'isnorse 2 cijà été trouvés st 3 auoi il peut 

bien voici ce qui se casse: 

- ZCST 

- Pre n'imcorte quel moment, 

= ©Xxé eu SST non nas an orsssant la tou- 
che mais en faisant: 4EZ 3LFHA ST ALSHA 

- Effectivement, vous vous trouverez un vas plus 
haut dans le catelorue, 

- Pressez AE’; 

= 5ATA ERPCR apoaraît à l'affichage. 


reccmmencez les 4 9or2mi>res océrations et oressez 
la touche de correction, l'instruction affichée 
sera alors décomposée en ceux oarties, l'une sera 
à l'extrême croite de l'affichase tandis que 
l'autre sera à l'extrême qauche. Certains carac- 
tères ont ét perdusoendant l'opération, “'autres 
ont Sté rajoutés, qu'est-ce que c'est 77? 

‘otez que, oour quitter le catalocue, il faut pre 
sser une touche autre que celle de correction. 
ue. synthétique. 

AVEZ-VOUS déjà essayé ceci! 

armez l'indicateur binaire 30 {indicateur de ca- 
talooue) et oressez 2/5...vous vous trouverez 
alors dans un cataloque tout à fait bizarre. 

Avec la programmation synthétique, j'ai aporis à 
ne olus m'étonner mais tout de même!!! 

Cette "anomalie" répond à SST et à 55T comme les 
trois autres catalocues. 

La basse-cour répond. 

Je sionale à Frédéric DARIN (TE) qu'un oroiet de 
synthétiseur vocal à été publié dans ELEKTER n°42 
Ce nontage à été conçu oour le Junior Comauter 
mais il est fort orobable qu'il soit acaptable à 
la 41 via le convertisseur HP-IL. 

Dans le dernier numéro du journal, à la page 
17; vous avez expliqué ‘que vous ne poss“diez pas 
ie module mathématique, c'est pourquoi j'accepte- 
rait de vérifier les applications mathématiques 
destinées à la 41 que les lecteurs voudraient 
bien me soumettre avant de vous les envoyer. 
Outre le module math, je dispose du * Fonction, 
de l'imprimante et du lecteur de cartes. Etes- 
vous d'accord ? 


3onne année à tous, 


Daniel TS59 MEVER. 


Q1sLBL “CALAN” 45 ACA 89 8 133 LOG 
82 5F 8i 46 CF 12 96 / 134 1 
43eLBL "CAL" 47 AI 9{ INT 135 XCY 
94 “ANNEE 2° 48 RCL 18 92 + 136 X<Y? 
85 PROMPT 49 1 E6 93 REL 86 127 “+ 
86 INT se / 94 PI 138 ARCL 85 
à7 ABS 51 RCL 1 95 + 139 ACA 
88e STG 18 Je + 96 2? 148 ISG 83 
99 FS2C 81 53 .81 97 / 141 GTO 67 
18 GTO 68 S4 + 98 SIN t42 PRBUF 
11sLBL 86 55 SF 88 99 ABS 143 RTN 

12 “MOIS ?* 56 XEO “N” 188 INT L44eLBL 87 
13 PROMPT 57 15 181 + 145 1SG 84 
{4 INT 'R1021 182 38 146 GTO 86 
15 ABS 59 K=Y? 183 + 147 
16 12 68 RER 2 184 DEG 148 ACA 
17 XKY? 61 15 185eLBL G4 149 ADY 
18 GTO 88 62 - 186 STO 81 158 7 E-3 
19 RIDK 63 STO 82 187 ,1 {51 ST+ ÿ4 
e8 ST0 11 64 3 188 % 152 GTO 45 
21eLBL “P- 65 * 189 ! 153eLBL 61 
22 FIX 8 66 2 118 + 154 SF 12 
23 CF 29 67 - 111 STO 63 155 ACA 

24 ADV 68 SKPCHR 112 8 156 CF 12 
25 SF 88 69 RCL 1 113 REL 62 ur 
è6 KE “0” 78 2 114 - 138 ACA 
27 ARCL 18 71 Xe#Y? 115 ,1 159 RTH 
28 SF 12 72 GTO 83 116 % 168eLBL 82 
29 AYIEN 73 RCL 18 171 161 7 

30 ADV 74 4 118 + 162 + 
LE 73 WOD 119 STO @4 163 RTH 

32 KEQ 81 76 k#87 128 CTO %6 164eLBL 88 
33 “N° F7 28 1216LEL 85 165 1,812 
34 XEQ Gi 78 x=47? 122 SF 88 166 STD 12 
35 79 29 js? 1676LBL 89 
36 XEQ Gil 88 GTD 84 124 RCA 168 REL 12 
37 “J" 81eLBL 03 125eLBL 86 169 INT 

38 KEQ 81 82 RDN 126 178 STO 11 
39 “Y" 93 RAD 127 FC2C 88 171 REG :P* 
4g %EQ 84 STD 88 128 ACA {72 166 12 
41 5" 85 PI 129 CLA 173 610 69 
42 KEQ 81 86 * 138 RCL 84 174 BEEP 
43 -D° 87 COS 131 INT 175 .EXD. 
44 SF 12 38 RCL 88 132 570 85 


Ce programme, comme indiqué dans un numé- 
ro de Key Notes n'est valable que du 1/3/1900 au 
28/2/2100. Cela vous suffit-il? sinon dans un numéro 
récent de PPC J (USA) est paru un article qui , je crois 
dit tout sur le calendrier (VON2,Mars 82 disponible 
au prés de PPC-USA). 

ol Les catalogues non normalisés sont une ceu- 
rtostté de la 41C connue depuis longtemps. Une ezxpli- 
catton et un programme d'application ont été publiés 
dans PPCTN VIN8 Mat-Juin 1981. Je n'at pas Le temps 
d'en faire une traduction ou un commentaire. St un 
volontatre.... 
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Que les lecteurs qui veulent mettre au point 


leurs programmes avec le module Math prennent contact 
avec Dantel. 


JAN 195335 


LMMJIYS 
1 


sr © 


3 4 5 6 7 8 9 
18 11 12 13 14 19 16 
17 18 19 28 21 22 23 





24 25 26 27 28 29 34 


31 
*% 
J. PIVIDAL 
Sep. E&2 
79 T9 7 ve 73 24 
Ce PR est CtnteracEif tL peut avec un nombre 


de connées Limitées calculer d'autres résuLEaës. 


Ce ?RS!' utilise 9 Reaistres de données 1 à 9 


at 64 Reatstres Programmes, 


UTILISATION = EXEMPLES 


4e - Installation 100 KH tanaente 0,42 


- Appuyer sur L 
(L'ordre des entrées tmporte peu) 


- 100 - 0,4 CD 


Pour obtenir Le costnus, appuyer 


affichage COS = 0,92 


Pour obtenir Le KilovoLtampère, 
108 


aopuyer affichaae KVA 


On peut avoir d'autres données ; 
Le COS et KVA ( on peut changer 1 valeur) 


2e = An ajoute une batterie de condensateur de 
19 KVAR - 15 

Nouveau COS' [BG } affichaae NCNS = 0,97 

Mouveau KW CF) affichaae NKY 


3e - Ce NCOS n'est pas satisfaisant (dans notre 
exemple), on veut un MCOS de 0,98 


pour une remise à zéro 


par Ex 


105 


Faire 0,98 [ G }La batteire de conden- 
sateur sera de { E_} COND = 


‘'OTA 





22 KVAR 


61 KEQ 93 188 FC? 86 155 RCL 84 292 * 
6è %E0 49 189 xEQ 46 156 ATAN 203 SF 86 
63 RTN 118 “NKW=" {52 COS 284 5T0 86 
64eLBL 04 {11 FIX 8 158 STO 83 205 207? 
65 FC? 44 112 ARCL 86 159 SF 43 286 RTH 
66 REC 64 113 AVIEN 168 RTN 247 RCL 85 
67 “TAN=" {14 RTH 161eLBL 83 288 RCL 42 
68 ARCL &4 115eLBL G 162 SF 25 249 / 
69 AVIEN 116 FIX à 163 RCL 4i 218 RCL 84 
t@ RTH {127 FC?C 22 164 RCL 62 eits 
71eLBL 49 118 GTO 47 165 / 212 ATAN 
22 CLST 119 STO 47 166 STO 83 213 CDS 
73 KRON 25,46 128 KEQ 88 167 FC?C 85 214 REL 62 
74 ENTER 191 158 168 GTO "ER" 215 XOY 
75 KROM 25:46 122 XROM 25,46 169 SF 93 216 + 
76 RIDH 123 RTH 178+LBL 4 217 STO 86 
Fr 26 {24eLBL 47 171 FC? 83 218 RTH 
18 K=Y? 125 FC? 47 122 XEQ 43 219LBL 97 
79 GTO 62 126 XEQ 47 173 RCL 83 228 FC? 86 
88 CLX 127 “NCOS=" 174 ACDS 221 GT0 67 
81 28 128 ARCL 47 175 TAN 232 RCL 86 
82 K=Y? 129 AYIEN 176 STO 84 223 RCL 82 
83 GTO 41 138 RTH 177 SF 84 224 / 
84 RTH 131+LBL 41 178 RTN 225 STO 87 
85+LBL E 132 RCL 42 179eLBL 95 226eLBL 88 
86 FC?C 22 133 RCL 83 188 FC? 84 227 ACOS 
87 GT0 45 134 * 181 KE0 @4 228 TAN 
88 ST0 45 135 ST0 81 182 FC? &6 229 STO 89 
89 62 136 x=9? 183 XEQ 86 238 SF 47 
98 XRON 25,46 137 GTO "ER 184 FC? 67 231 RTH 
91 RTK 138 SF 81 185 XEO 47 2326LBL 47 
92eLBL 85 139 RTH 186 RCL 89 233 RCL 95 
93 KEQ 45 14deLBL 82 187 ABS 234 RCL 81 
S4 “COND=" 141 SF 25 188 RCL 84 235 / 
95 FIX 8 142 RCL 81 189 - 236 RCL 84 
96 ARCL 85 143 RCL 63 198 RCL 81 237 - 
97 “HKYAR" 144 / 191 * 238 STO 89 
98 AYIEX 145 STO 42 192 ,994 239 ATAN 
99 RTH 146 FC2C 25 193 + 248 COS 
i88eLBL F 147 GTO "ER" 134 ABS 241 STO 67 
181 FC2C 22 148 X=07 195 STO 45 242 SF @7 
182 GTO 86 149 GTO "ER" 196 RTN 243 RTN 
183 STO 46 158 SF 82 197eLBL 86 244eLBL “ER” 
184 %4 151 RTN 198 FC? 687 245 “PARANETRE ?° 
185 KROM 25,46 152eLBL 83 199 XEQ 67 246 PROMPT 
196 RTN 153 FC? 4 288 RCL 82 24? .END. 
187eLBL 66 154 GTO 43 281 RCL 87 

% De 


ROUTINES ALPHA (suite...) 


La routine AA présentée dans VINI1PS retournait les let- 


tres d'une chaîne de caractères grace aux fonctions de 
l'EXM.L'inconvenient est qu'elle utilisait autant de re- 
gistres que la chaîne contenait de caractères.Il fallait 
réaliser cette opération dans la pile ! C'est chose fai- 
te puisque je peux vous présenter aujourd'hui plusieurs 
solutions.Celle de Bravo J.L.(T2) tout d'abord qui utili- 
se la même technique que AA2 que nous allons décortiquer 


maintenant: 


Certains arrondis ont été faits dans Le 
calcul de La puissance des condensateurs, 
cela n'a pas d'importance car, en réalieé, 
on est obliaëé de s'adapter aux puissances 
du commerce. 


XYXHHP-UIRXXEX 


RME 





Soit..s-+ABCDEF..+.+.4e longueur N(Aleng=Nbre de caractères) 
FBCDEA....-.inversion de la première lettre et de 
la lettre de rang N. 
BCDEAF .....-.r0tation une lettre 
ECDBAF..+:.++eChange première lettre æ&t lettre de 
rang N-2. 
CDBAFE.....-r0tation une lettre 
DCBAFE....+-eChange première lettre et lettre de 
rang N-4,. 
FEDCBA. .+.+-dernière rotation=-N/2 
Lorsque N est impair,la technique est la même puisqu'une 
lettre qui s'échange avec aucune autre se trouve donc à 
sa place.Les seules lignes synthétiques sont les lignes 
9,12,25 qui sont des NOP.Je vous rapelle la façon de l'ob- 
tenir;tapez RCL IND T;BST;B.G.;@-;:SST et vous voyes Fe 
Si vous êtes vraiment allergiques à la PS remplacez ces 
lignes par LBL 99 ou STO X qui sont neutres.On remarque 
que la routine AA2 est plus rapide que celle de Bravo 
pour la simple raison qu'elle utilise moins de AROT, 


AL4LEL “HATT” ë e : … . : w fonction malheureusement très lente... 
f2eLBL 3 î ‘ Routine AA3 
83 CLRG 18 FIX 4 33 KEQ re Ici le problème est résolu à partir €u même principe évo- 
&4 4 19 "KH=" 4 FI 0 {0 6 qué plus haut.Néanmoins,afin de mieux utiliser la pile, 
85 XRON 25,46 28 ARCL 61 33 “KYA= D la chaîne est inversée par blocs de 3 lettres à la fois. 
6 RTH 21 AVIEM hehes se Et D'où gain de rapidité mais aussi de place !!Autre contrainte 
A7eLBL A . é : So 53 AVIEM les chaînes de 2 lettres ne sont pas inversées(faîtes le 
; ie . ECC 42 ZSeLBL C 54 RTN à la main pour une foisii }. 

us 25 CTO 02 49 FIX © SSeLEL D Soit..e-ABCDEF..-.--9grace à ATOX, stockage de A(contre- 
F He 26 STO 42 41 FC2C 22 56 FIX 2 valeur décimale) en Z,de B dans Y 
12 Fan &3 27 SF 82 42 GTO 43 57 FC?C 22 aise -#is M A Xe 
13 XEU @2 28 FS? 43 nur ru "DEFCRA! 26. Le 

29 YEQ 81 44 SF 83 39 STO 64 ++....par XTOA et RDN rappel des registres 
ne gi 36 PTN 45 XEQ 84 68 SF @4 de la pile,transformation en alpha 
PPC-T N 3 
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Puis le processus est répété pour les trois dernières 
lettres.Facile pour 6 lettres...Mais la situation se 
corse pour un nombre plus important de lettres.Ill faut 
entre chaque restitution par XTOA que la chaîne tourne 

de trois fois le nombre de groupes déjà inversés.Puis les 
caractères sont restitués et la rotation inverse de la 
précédente est alors effetuée...J'epère que je m'explique 
bien, mais ce n'est pas mon métier... 

La routine AA4 enfin traite des groupes de 4 caractères 
ce qui est avantageux pour la vitesse d'execution sur des 
grandes chaînes et pour le sport,mais pas sur la longueur 
du programme... 


DES LETTRES , encore... 

Un moyen pour notre HP de reconnaître les voyelles des 
consomnes!Les valeurs décimales des voyelles sont respec- 
tivement 65,69,73,79,85 et 89.0n appelle la valeur des 
lettres du registre alpha par ATOX.Le drapeau 25-d'erreur 
est levé, puis on adresse le programme à la valeur du 
registre X.Si cette adresse n'existe pas,le drapeau 25 
est baissé,c'est une consomne! 


Enfin une solution originale proposée par KLEIN Bruno 
(T34) .Elle n'utilise aucun registres de mémoires mais 

est en revanche un peu lente du fait de la création d'un 
fichier ASCII dans le module EXM.Gros avantage,cette 
astuce permet de retourner un texte entier,bien au delà 
des 24 lettres du registre alpha. (Routine INVA) 

Voilà donc pour les retournements dont j'avoue être un 
peu saturé.En effet leur utilité dans un programme n'est 
pas évidente.Mais je remercie ceux qui se sont attardés 
sur ce problème,rien que pour le sport!!(la discussion 
n'est pas close et n'hésitez pas à m'envoyer d'autres 
solutions) 

Pour changer,je vous propose un autre problème: je pense 
qu'il est possible de classer alphabétiquement les lettres 
d'une chaîne, dans la pile évidemment.Il serait interessant 
de trouver une méthode puisque là,les applications sont 
nombreuses.En particulier, ordonner une suit£ d'enregistre- 
ments dans un fichier ASCII.Cette opération classique 

est réalisable grace aux méthodes de tri à partir du 
moment où un enregistrement peut être comparé à un autre. 
Autrement dit lorsque chaque enregistrement représente 
une certaine valeur pouvant être comparé arithmétique- 
ment.Restæ à déterminer cette valeur représentant la 
“hauteur alphabétique" de la chaîne dans un ensemble de 
chaînes.Le problème est posé:Avis aux amateurs....e. 


CONSEIL PRATIQUE; votre machine dort dans son étui??Alors 
glissez là par le lecteur de cartes;celà vous évitera 
lorsque vous la sortez de l'étui de la retirer par le 
lecteur de cartes qui peu à peu prend du jeu et trem- 
blote à chaque mouvement. 





ECHEC AU RADAR !!! Grace à GV qui devrait s'appeler PV 
-petite vitesse- mais aussi procès-verbal ...Donc GV 

et le Time Module peut vous éviter beaucoup d'ennuis. 
Lorsque vous ne conduisez pas(i!) pressez À en mode 
user.Lorsque vous croisez une borne kilométrique,pres- 
sez R/S:KRONO s'affiche.A la prochaine borne,soit un 
kilomètre plus loin,vous pressez à nouveau R/S et 
s'affiche alors la vitesse à laquelle vous avez effectué 
ce KM.Comparez alors auwec le compteur de votre véhicule. 
Peut se pratiquer à pied,à cheval,en train et même en 
navette spatiale:prévenez la NASA qui posera les bornes.. 


PRP “Af3" 
13:44 29.11 16 3 à vi de 
A14LBL “A7” 17 «  … 
à E3 43 ATOX 
92 XEQ “EE” 18 : E3 + 5h h 
83 à 19 / 
: 32 XT0A 
4 ALENG 88 3 E-5 33 2 45 RDN 
95 570 Z 1 + 46 XTOR 
+ a 34 XT0R 47 
47 MOD 22LBL 96 F … 48 AROT 
+: . 37 ART 4geLBL 81 
à9 SF GA 24 ATOX 28 16 & 
2 3 58 PROMPT 
18 #€> Z 25 ATOX D. 
j 39 GTO 48 Si END 
11 LASTE 26 Rt HR 
: Fe 41 GTO 81 
13 INT 28 AROT 


id i 


15 = 
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ee 
te) 
1 
re 
fx 

43 


44 
si 


QLéLEL “EE” PRP AR?" Sani T6 
82 AOH 13:43 29.1! 
93 “TEXTI- G1eLBL “A2” ci 
84 TOP 42 XEG “EE” ie à PRP “6Y 
45 AUFF 43 ALENG 12: né ds. 
@6 END g4 ST L ee 
ASeLBL 81 | 
PF “ERAYO" 46 ATOK Da A 
13:83 29.11 a7 HO Pi 
ALeLEL "BRAVO" 48 DSE # : Li. 0a 
42 XEQ “EE Do es 
43. 18 STO 2 or 
q4 ALENG 1 SE K ae 
45 2 £ : 
dé - 13 AROT ë ARE 
a7 LASTK 14 ATOK : . 
98 / 15 XC 2 ï he 
49 IKT 16 XTDR Fu 
tâ E3 17 Rt re 
11 18 CHS LS AK 
19 AROT 16 *V= : 
12+L8L 48 28 pt % mr 
13 DSE Y 21 KT0A es 
14” 22 KOY h 
15 AROT 23 CHS 2 . 
16 ATOK 24 DSE X ñ 
17 XOY 25 “» 22 
18 CHS 26 2 
19 AROT 27 XOY 
28 CHS 28 +? 
1 X0 2 29 #39? 
22 AROT 34 GTO 41 
23 x 31 LASTX 
24 TOR 32 -? 
25 ATOX 33 / 
26 Rt 34 ARÔT 
27 AROT 35 PRONPT dc 
28 AROT # EE 38 Ed du Conninaes 
29 KOY 31868 St Caudens 
nr Tel:61-89.61.14. pers, 
1 40 T Tel:61-62,62,75.  trav. 
32 PROT 
33 XOY 
34 156 X 
35 GTO 68 
36 PROMPT 
37 END 
16 E3 33 XT0R 51 XTOR 
PRP “An4" {7 / 34 RDN 52 RIX 
13:84 29.11 18 4 E-5 35 XT0A 33 4704 
Bi+LBL “A4” 19 + 36 RD 54 RDX 
82 XEQ "EE" 26 STO L 37 XTON 55 F5? 43 
83 ALENG 38 LASTX 56 XTOA 
4 STO Z 21+LBL 08 39 CHS 57 -2 
85 4 22 570 L 48 AROT 58 FS2C 93 
46 MOD 23 ATOX 41 ISG x 59 -3 
87 SF INB 24 ATOX 42 CTO 88 64 AROT 
88 K€) 2 25 ATOX 43 FS?C 98 
89 LASTX 26 ATOK 44 GTD 81 6ieLBL 81 
18 87 XL 45 FS?C Q1 62 . 
11 INT 28 CHS 46 GTO 81 63 XOF 
1 29 AROT 47 ATOX 64 PROMPT 
1 - 38 0 L 48 ATOX 65 END 
14 4 31 XTOA 43 FS? 83 
15 + 32 RDX 58 ATOX 
* * 


Monsieur, 

Je vous propose la méthode de Bairstow pour 
chercher TOUTES les racines réelles et complexes. J'ai 
essayé d'éliminer tous les inconvénients, mais c'est 
une excellente méthode (meilleure que Newton). Je n'ai 
pas d'imprimante, donc pas de listing, mais je vous 
envoie un jeu de cartes. 

- le programme prend 5 pistes, donc 3 cartes 
la 6°piste donne invariablement MALFUNCTION sur mon 
lecteur- pouvez-vous l'essayer sur le votre et me 
dire s'il en est de même. J'ai quelques cartes ayant 
cette détestable propriété, pourriez-vous me l'expli- 
quer? (si c'est normal). 

- est il nornal aussi que l'affichage pä- 
lisse quand j'appuie au centre des touches USER et 
PGM/Alpha (j'ai eu à l'achat quelques problémes d'af- 
fichage et j'ai dû faire échanger mon HP). 

- où puisje trouver des imprimantes d'oc- 
casion? 

-Quels sont les délais de réception des 
livres (j'attend le mien CTR) 


Votre revue est trés intéressante, merci 


Leroy T70 


281 GTO 48 232 X=0? 863 / 297eLBL 33 
282 / 233 GTO 33 264 CHS eye 
Il y a quelques cartes défectueuses, envt- 293 STO 46 234eLBL 11 265 BEEP . De 89 
on 1 ou 2 sur 100. Il faut les jeter impitoyablement, 284 RCL 87 235 2 266 “Y=" 308 AVIEM 
en de plus pénible que de perdre un programme pour 885 K>v? 236 ST- 81 267 ARCL X 381 TO 11 
re tnattention. Utiliser ausst systématiquement la 246 GTO 18 237 4 268 PROMPT 302LBL 23 
‘onction VER aprés une écriture de carte. 207 DSE 88 238 REL 81 269eLBL 31 363 SORT 
Le probléme d'affichage vient sans doute 28 GTO 88 239 XEQ I 278 “FIN* 304 ST+ 89 
l'une fixation du clavier avec un peu de jeu qui en- 289 BEEP 248eLBL 32 271 BEEP 385 ST- 18 
raine des contraintes sur l'affichage. Ce phénomène 218 “PRECIS=" 241 RCL 42 272 PROMPT 306 “£=" 
st fréquent sur les caleulatrices à bon marché. Il è11 SCI 8 è42 4E8 b 273eLBL I 297 ARCL 49 
2 paratt pas trés génant dans votre cas. 212 ARCL 86 243 RCL 02 274 1 E-3 308 AVIEM 
regardez La colonne petites annonces de 213 PROMPT 244 XER 3 275 * 309 “Y=" 
‘PC-T et soyez rapide, elles sont rares et recherchées! 214 GTO 68 245 RCL IHE Ÿ 276 + 318 ARCL 18 
Le délat pour les livres varte de 48h st 21SeLBL 18 246 STO IND Ÿ 277 ST0 82 311 AVIEN 
‘L est dispontble (chez le trésorier Sibille) à 2 216 BEEP 247 ISG 82 278 RTH 312 GTO 11 
ots st votre commande arrive à un mauvais moment + 217 SF el 248 GTO 32 279eLBL à 313eLBL 13 
218 FIX 7 249 RCL 81 . 16 314 CHS 
219 RCL 63 258 2 F 315 SORT 
Utilisation du programme: Répondre aux 228 2 251 XC=V? 282 RTN 316 570 89 
uestions Degré? (éventuellement changer le SIZE) 221 / 252 GT0 81 283eLBL b 317 "RERD=" 
coefficients (Ak pour le degré k), les coefficients 222 CHS 253 es 284 18 318 ARCL 18 
ont revus pour vérification ou correction puis on 223 STO 85 254 x°47 285 + 319 AVIEN 
‘emande les valeurs de départ p et gq (si pas de ré- 224 STO 18 255 GT0 31 286 RCL 88 320 “IMCXD>=+/-" 
oonse, ce sera 0,0) et précision (si pas de réponse, 225 xt2 256 1 287 + 321 ARCL 89 
e sera 10-3) si le nombre d'itérations est trop èlevé 226 REL 84 257 KE à 288 RTH 322 AVIEN 
u si les valeurs de P et Q sont mauvaises il y a de- 227 à 258 STO Ÿ 289eLBL c 323 GT0 11 
iande de réinitialisation (aprés éventuellement “pré- ST ke … ” 324 .END. 
NID SRRRÉRES "SRE . 238 1047 261 RCL IND Ÿ 292 RCL 68 
Si la précision déja atteinte semble pro- 231 CIO 23 262 RCL IND Ÿ 293 + 
retteuse on peut essayer de poursuivre (ne pas repren- 294 RCL 88 
dre à INIT pour conserver les valeurs déja obtenues 295 + 
P et Q, éventuellement abaisser la précision demandée) 296 RTN 
Dans les autres cas on peut changer les va- 
leurs de P et Q en particulier s'il n'y a pas eu de * # 
précision atteinte indiquée, il faut modifier P et Q. 
XEQ “D" permet aprés un arrêtede visualiser 
Ha polynôme rs cours; mais il vaut sex évi ter de Toulouse,le 27 Octobre 1982. 
l'utiliser n'importe où! sous peine d'altérer la reco- 
pie du polynôme à traiter ensuite. Le réserver pour 
une révision du polynome au départ. 
La précision désirée est en R7, la préci- 
sion atteinte en R6 T.89 LEGRAND René 
62 Allée des Demoiselles 
BLeLBL “BAIRST- St STO IND Z 181 KEQ c 151 STO 11 21400 TOULOUSE 
g2 “JECRE=" Se 1 182 STO 12 152 RH 
93 PROMPT 53 XEG b 183 ! 153 1 à 
44 STO 86 . Im = 154 - Re 
45 570 êi 55 KE8 c 185 ST0 13 155 REL IND X P.P,Ce Te Monsieur I 
dé KEÙ € 56 à 186 ! 156 STO 1? 77 rue du Cagire 
98 STO IND X 58 STO IND Z 188 STO 14 158 x?2 
49 “SET SIZE * . es AOL M 159 RL 12 
18 1 68 STO 83 118 XEQ à 168 RCL 89 
11# 61 PI 111 RCL IND & 161 REL 18 
12 FIX 8 62 STO 84 112 RCL IND 18 162 - Cher Monsieur DODIN, 
14 FC?C 25 64eLBL 88 114 + 164 + 
15 PROMPT 85 BEEP is - 165 STO 65 Re 
16 SF 88 66 “INIT PtQ 116 RL IND fl 166 X=87 Je me permets de vous soumettre çi-joint,un programme 
% 
(74LBL D we 117 REL 84 167 GTO 88 
18 4 . _. Le + 168 RCL 49 catégorie "professionnel" avec toutes les garanties d'usage 
‘ à | 169 REL 11 
: . 1 78 GT0 18 128 STO IND 89 178 * relative à son emploi. 
DLeLBL 12 71 ST0 #4 {21 RCL IN 13 171 RCL 13 
22 FIX @ : ue 83 se ” 33 172 RCL 12 Brave pour votre Journal, et bien amicalement votre. 
23 «ÿ 173 + 
4 ù gl 74eLBL 18 {24 - 174 - 
25 RCL 82 75 “PRECISION ?" 125 RCL INR 14 175 REL 05 
36 INT 76 CF 22 126 RCL 84 176 / 
37 - 77 PROMPT 127 * 177 ST+ 63 ; 
38 ARCL X 78 FC? 22 128 - 178 ABS 
99 += 79 1 E-3 123 STO IND 12 179 STO 86 T.89 LEGRAND R. 
38 RCL 82 80 STO 07 138 156 82 188 RCL 13 
31 YE0 à 81eLBL 81 131 GTO 22 181 RCL 11 
D FIX 6 82 REL 81 132 REL 81 182 + 
33 FC9 86 832 133 XE0 b 183 RCL 09 
34 ARCL IND X 34 + 134 RCL INB & 184 RCL 49 
35 CF 22 Abe PE 5 185 RCL 18 : n . 
36 PROMPT = 88 . _ 186 - Bien volontiers,je vous aurais soumis ma candidature pour vous 
+ ? + 
: nu ÿ : … , En mn a = 4 aider dans les besognes matérielles,mais je dois partir en Turquie 
: e ee .. 148 du +3 ” et de là-bas ce n'est pas possible,cependant je reste fidèle à PPCT 
9€ 48 ? IR 191 ST+ 84 
Fu 92 XEQ b 142 1 192 ABS 
id . à ” 4 $EB € Due FERRAILLAGES, 
#1 35 - 145 REL IHD X . 
45 4 d6 ST0 18 146 STO 16 195 RCL 83 (nécessite l'imprimante) 
46 XEQ b 97 147 RDN 1 1 Ce programme permet,à partir d'un plan d'exécution 
47 4 ag - 148 1 197 RCL 44 béton armé,de sortir par diamètres le quantitatif : 
48 KEQ € L 99 570 11 149 - tn lonqueur totale,nombre de barres à sortir du stack en long- 
5 _ ÿ 188 RCL 82 158 RCL IND X 200 y=92 -ueur de 12.00 Mil.;le poids,compte tenu des chutes et liga- 


-tures évaluées généralement à 5% du poids théorique; le 
récapitulatif qui donne le poids total tous diamètres 
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confondus à facturer;le poids total des aciers sortis du 


stock. 


Ce programme nécessite quatre cartes magnétiques. 


diamètre des aciers 25-6=8=10=12=14=16=20=25=32%40 » 


Mode _ d'emploi. 


-introduire les cartes 
faire EXQ "X" 
-le display indique "SIZE 026 SVR" 
-exécuter "size 026" 
-faire "R/S" 
-le display montre "5" ceci indique que le calcula- 
teur est prêt à ingurgiter les barres de diamètre 5 
introduire les longueurs lues sur le plan par"R/s" 
unité Ml,cm;éventuellement réaliser les opérations 
telles que 15 entert1,25 R/S (15 barres de 1,25 M1.) 
-le display "5" reste toujours affiché,introduire 
toutes les autres barres 
-changement de diamètre 
faire EXQ " "  A=f 5;B=f 6;C=f 8:0=f 103E=f 12 
Fæf145;Gmÿ16;H=f20; 1=925;3=f 32;K=f 40, 
Vous désirez introduire les ff 20 ....XEQ "H" 
introduisez les longueurs par R/S. 
Vous avez oublié quelques barres de 5....XEQ "A" 
et ajoutez vos barres. 


Quand vous avez terminé l'introduction des quantités, 

faire EXQ 00,1a machine imprime 

1°) le diamètre en caractère double hauteur 

2°) la longueur totale utilisée dans ce diamètre 

3%) le nombre de barres de longueur 12M1. pour le 2° 

4*) le poids d'acier,compte tenu des chutes et liga- 
tures estimées à 5% 

et,ce,paur tous les diamètres de 5 à 40. 


Il est alors imprimé "POIDS TOTAL KGS." 
facture = (poids total réel utilisé) 
sortie stocks =(poids total éqal à la somme des 
longueurs des barres de 12M1. sorties dans cha- 
-que diamètre) 


NOTAs Pour ceux qui désirent serrer les prix,les 5% 
peuvent être ramenés à 3% ou x%,changer les instruc- 
tions 226 et 237 en 1,03 ou 1,x 

Ce programme est établi pour des aciers TOR; 
pour des aciers doux ou autres il convient de changer 
les poids unitaires des instructions 13 à 33 ou alors 
d'introduire après les pas 226 et 237 un coefficient 


multiplicateur égal à : poids 1M1. acier doux ; x 
poids IM], acier TOR x 


"Bons Métrés" 





Re LEGRAND T.89 


92 “SIZE 426 SWP” 44 GTO B 36 48 128 XEQ 81 
83 PROMPT 4SeLBL C 87 STOP 129 RCL 18 
84 SF 12 46 3 88 ST+ 21 138 STO 11 
45 “FERRAI" 47 STOP 89 GTO "K° 131 RL 97 
86 “HLLAGES" 48 ST+ 13 98eLBL 48 132 STO 98 
CH PRa 49 GTO C 91 5 133 20 

08 CF 12 S8eLEL 3 32 XEQ 81 134 KEQ 1 
89 ADV 51 18 93 RCL 12 135 RCL 19 
18 FIX 2 32 STOP 34 STO 11 136 STO 11 
11 CF 28 33 ST+ 14 35 RCL Bi 137 RCL 68 
2 CLRÈ 54 GT0 D 46 ST0 86 138 STO 68 
13 ,154 JSeLBL E 37 6 139 25 

14 STO 48 36 12 36 XEQ 81 148 XEQ 81 
15 ,222 37 STOP 39 RCL 13 141 RCL 28 
16 STD 81 58 ST+ 13 188 STO 11 142 STO 11 
17 ,395 59 GTO E 141 RCL 82 143 REL 89 
18 STO 82 68eLBl F 182 STO 88 144 STO 88 
19 ,617 61 14 193 4 145 32 

21 ,888 63 ST+ {6 185 RCL 14 147 RCL 21 
22 STD 4 64 GTO F 186 STO 11 148 STD 11 
23 1,288 65eLBL G 197 RCL 83 149 RL 18 
24 STO 95 66 16 188 STO 88 158 STO 88 
35 1,578 67 STOP 189 18 151 48 

26 STO 46 68 ST+ 17 118 XEQ 81 152 XEQ gi 
28 STO 47 t6eLBL H 112 STO 11 154 SF 12 
29 3,854 71 28 113 RCL 84 155 “PBS TOTAL = KES” 
38 STO 08 72 STOP 114 STO 88 156 PRA 

31 6,313 73 ST+ 18 115 12 157 CF 12 
32 STO 49 74 GTO H 116 XEQ A1 158 FIX 9 
73 9,684 75eLBL ! 117 RCL 16 159 Av 

34 STD 18 76 25 118 STO 11 168 SF 13 
%5 18 ST+ 19 129 ST0 68 162 PRA 

37 STOP 79 TO I 121 14 163 CF 13 
38 ST+ 11 S8eLBL J 122 XEQ 81 164 REL 22 
dGLEL B 82 STOP 124 STO 11 166 SF 13 
41 6 83 ST+ 28 125 RCL 86 167 “SORTIE STOCKS =" 
4 SToP 84 GTO J 126 STO 46 168 PRA 


169 CF 13 188 5TOP 287 RCL 23 226 1,65 
178 RCL 25 189LBL 1 298 FIX 8 227 * 
121 PRK 198 FIX 8 289 PRX 228 PRK 
172 CLRG 191 SF 12 218 FIX 2 229 ST+ 22 
173 *  TERMINE" 192 PRY 211 KEQ 65 238 ADY 
174 PRA 193 CF 12 212 GTO 84 231 RTN 
175 TOHE 9 194 FIX 2? 213eLBL 03 232eLBL 65 
176 BEEP 195 REL 11 814 RCL 24 233 RCL 88 
{72 TONE 9 196 PRK 151 234 * 
178 TOHE 8 197 12 216 + 235 12 
179 BEEP 198 / 217 FIX 8 236 + 
188 TONE 7 199 STO 23 219 PR& 237 1,85 
181 BEEP 888 INT 219 FIX 2 238 + 
182 TONE 3 281 STO 24 228 KEG 85 239 ST+ 25 
183 BEEP 282 RCL 23 2214LBL 84 248 RTN 
184 BEEP 293 K=Y? 229 AY 241 “EXD 
185 TOHE 2 284 GTO 62 223 RCL 11 242 .END. 
186 TONE 8 285 GTO 83 224 RCL 88 
187 BEEP 206+LBL 82 225 «* 
Æ * 
Voici deux programmes de Marcel Trimborn 


(T86). I1 m'a donné une description des programmes, 
mais pas de mode d'emploi! Ca ne doit pas être trop 
dur à trouver. 

l)Répétiteur de table de multiplication 
(SIZE 008) 


2) Multiplication des grands nombres. 


| Signalons à ce propos que quand vous four- 
ntssez un programme plusteurs éléments sont nécessat- 
res: d'abord un mode d'emploi du programme: à auot 
correspondent les entrées et les sorties, avec si pos- 
stble un jeu d'essat (exemple); ensuite les caractéri- 
stiques nécessaires au fonctionnement: SIZE, nombre 
de modules, périphériques nécessaires... 

Une description ligne par ligne est trés 
utile, mats doit être tapée à la machine pour que je 
puisse l'utiliser, en se référant aux ligne du program- 
me par leur numéro. Surtout pas de commentatre Le 
long des lignes du programme, ce qui rend la mise en 
page trés diffteile. 

St vous n'avez pas d'imprimante; ce n'est 
pas grave, de toute façon (et dans tous Les cas) 11 
faut joindre des cartes magnétiques et je fais mot- 
même le listage. Joitgnez quand même un listage, même 
manuscrit car 1l arrive qu'une carte soit tllistble 
et tl faut alors compléter à la main. VERifiez quand 
même vos cartes avant de me les envoyer. Les cartes 
(ou plutot un nombre égal de cartes vierges) sont 
retoumée aussttôt (sauf oubli de ma part, j'ai parfois 
beaucoup de courrier, ne m'en veuillez pas). 


43 REL 81 


A1eLBL “TAB-HUL* 95 STO 82 
G2eLBL 84 44 INT 86 156 81 A1+LBL “HGN” 
63 FIX 4 45 F5? @i 97 GTO 88 82 FIX 4 
84 CF 28 46 XEQ 15 88 18 93 CLRG 
a5 CF 29 47 CLA 89 ST- 81 84 CF 29 
86 CF 8 48 ARCL 88 98 15G 88 85 5,1 
97 CF 81 43°"+2x" 91 GTO 86 96 STO &8 
88 ,042 58 ARCL X g2 F5? 88 87 CF 22 
49 STO 82 st +=" 93 GTO 84 48+LEL 48 
18 + Je RCL 88 GéeLBL D 89 SG 48 
11 STO 86 53 INT 95 REL 84 18 -N2?- 
12 2,81 34 * 96 RCL 84 11 PRONPT 
13 5TO 64 33 STO 87 97 RCL 85 12 FC?C 22 
14 1,81 56 F5? 08 98 + 13 GTO 81 
15 5T0 61 37 GT 87 99 / 14 STO IND 48 
16 à 58 "+? 188 28 15 GTO 88 
17 STD 84 S9eLBL 81 181 * 16*LBL Qi 
18 STO 83 68 CLX 182 “HOTE=" 17 RCL 88 
19 STO 85 61 AVIEN 183 ARCL X 18 INT 
28 “CHOIX ?° 62LBL 85 -+/28" 
21 PROMPT 63 PSE u PR . % o 
224LBL A 64 FC2C 22 1866LBL 15 21 ST- 46 
23 SF 80 65 GTO 85 187 RCL 86 22 - 
24 GTO C 66 RCL 87 188 9821 83 ,1 
2SeLBL B 67 X=Y? 189 + A ? 
26 SF 81 68 GTO & 118 ,211327 25 6 
27eLBL C 69 1 {ii + 26 + 
28 “LAQUELLE 2" 78 ST+ 65 112 FRC 27 ST0 81 
29 PROMPT 71 TONE 3 113 STO 86 28eLBL 82 
30 #=4? 72 156 & 114 9 29 ISC 08 
31 GTO 86 73 GT0 81 115 * 39 M2" 
 ,1 74+LBL 67 116 INT 31 PROMPT 
LE 75 ARCL 87 117 2 32 FC?C 22 
34 + 76 AVIEX 118 + 33 GTO 81 
35 510 48 77 REG 15 119 RCL 83 34 STO IND 4 
36eLBL 86 78 GTO 83 128 #=v? 35 GTO 42 
37 CF 7%eLBL 62 121 GTO 15 36LBL 81 
38 “TABLE DE * 88 | 122 XO 37 RCL 84 
39 ARCL 86 81 ST+ 84 123 STO 83 38 INT 
48 AVIEN S2eLBL 93 124 .EXD. 39 STO 88 
41 PSE 83 RCL 82 4 1 
42eLBL 88 84 FRC 4i- 

42 ,1 
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ni RCL 03 85 + 86 ST+ IND Ÿ 187 RCL 88 

45 + 66 47 97 IS6 81 188 + 

46 STD 82 67 RÈL IND Ÿ 88 GTD 43 149 RCL 82 

48 ST0 83 69 4 58 FRC iii : 

49eLBL 03 Fa 18t* 316 112 STO 03 

5@ RCL IHD 82 71 4 g2 + 113eLBL 64 

S1 RCL IND 61 72 IHT 33 STO 81 114 FIX 8 

59 # F3 ST+ 64 4 1 115 CLA 

53 4 74 LASTX 95 ST+ 85 116 RCL IND 43 

54 1814 75 FRC 96 RCL 85 1128 

SS / 76 4 97 STO 83 118 181X 

56 INT 77 18tx 38 15G 82 119 / 

57 GTO @4 F8 * 99 GTO 43 {28 ARCL x 

58 LASTY 79 ST0 IND € 148eLBL B 121 ASHF 

59 FRC 88 ! 181 REL 86 122 AYIEN 

68 4 91 ST+ 43 182 RCL 81 123 PSE 

61 18ts 82 RCL 98 143 INT 124 DSE 43 

62 + 83 RCL 83 1f4 - 125 GT0 44 

63 RL 68 54 + 145 1 126 TOHE 9 
* + 


Là j'ai le programme, les cartes magné- 
tiques, maïs pas Le nom de l'auteur, qui devait se 
trouver sur une lettre portant d'autres sujets et qui 
a donc été séparée des programmes... 

BIDDEN est La classique recherche d'un nom- 
bre caché, adaptation à la 41C d'un programme pub lié 
dans L'Ordinateur de Poche pour PC 1211. 

FIX O, 

XEQ HIDDEN 

introduire une semence à La demande ALEA? 

introduire les bormmes bas et haut jusqu'a 
découverte du nombre, les bornes sont alors égales. 

On recommence? out=0, non=1 (tiens! d'ha- 
bitude c'est le contraire) 


5! 48 GTO 82 72 AVIEN 
8ieLBL “HIDDEN* 36 ST+ 87 49+LBL 18 73 PSE 
84 STO 83 à MENT 4 52 PSE 76 ARCL X 
85 “ALER ?* nuit 53 KO 81 77 AVIEN 
26 PRONPT or 54 YO 78 PSE 
87 STO 08 à ET 55 GTO 82 79 -0H RECOMME* 
sgeLBL gl Tr SEL 11 ” 9 “HE 9 

34 GTO 42 37 “TROP HAUT 
19 STO 82 HS 58 AVIEN 82 PSE 
11 RCL 88 ou 59 PSE 93 “OUI=8 HON=1" 
12 9821 0e 68 XOY 84 PROMPT 
13 + + Qt 61 KO 81 35 4297 
14 ,211327 er 62 GTO 82 86 GTO 81 
15 + Di 63eLBL 83 87 RTN 
16 FRC ’ Fe 64 KO 81 88eLBL 84 
Un Gin Se Sont 
19 + té bus 67 GTO 84 91 PSE 
2@ INT H: ER 68eLBL 85 92 KO) 81 
A! 0 69 “BRAVO , CI 93 GTO & 
F3 n = 
22 + au 78 “HIT 94 .END. 
23 STO 81 71 ARCL X 
246LBL 82 


* * 


Le but du jeu est d'alunir en fixant le dé- 
bit de fuel en Kg/s toutes les 10 secondes en vous 
aidant des renseignements fournis (temps, altitude, 
vitesse, fuel restant, distance que la fusée parcour- 
rait en conservant la même vitesse). Ce débit est nul 
ou compris entre 4 et 90 Kg/s 

Je vous préviens que ce n'est pas facile. 

Merci beaucoup et bonne programmation 

Franck Lebastard (T35) 


èi S1+ 89 


BieLBL “LEN- 41 STO 11 él + 

B2LEL 80 hu 42 TÜNE 9 62 ,5 

83 CLR Fu 43 “T=" 63 + 

94 FIX 8 + 44 REL 12 $4 INT 

85 CF 29 45 INT 65 ARCL X 

96 CF 45 RAR 46 BREL À 66 “+ KN- 

47 120 Fo 47 “+ SEC.” 67 AVIEN 

88 STO 81 “huh 48 AVIEN 68 PSE 

89 ! D HUE 49 PSE 69 “VIT: 

18 STO 18 Re sè “ALT:" 78 REL 19 

11 32508 sa 51 REL 42 71 INT 

12 STO 13  SIOR 52 INT 7è ARCL X 

13 16588 Run 53 ARCL X 72H KA po 

14 STO 14 - _ . 54 “+, 74 AVIEX æ 
15 81 . 55 RCL 81 75 PSE Zsr 
16 STO 87 : 56 1,689 76 “FUEL=" di 
17 18 Raul 57 * TRS Uet 
18 STO 66 n° 58 RCL 62 78 INT OS 
196LBL 84 ++ 90 1 59 - 79 ARLX LEO 
28 1 is 68 1 E3 gg “ke LE 


31 AVIEN 
82 PSE 

83 “d./18 S.=* 
84 RCL 17 
95 INT 

86 ARCL & 
87 AVIEN 
83 PSE 

29 RCL 89 
sa x+8? 
91 GTO 18 
92 XxEQ 79 
93 CLX 

94 STO 49 
95 GTO 84 
J6eLBL 18 
97 “ DEBIT ?* 
98 PRONPT 
99 STO 18 
148 x=8? 
141 GTO 13 
192 4 

183 42Y? 
164 GTO 11 
185 XCY 
186 98 

187 KQY 
188 xC=Y? 
149 GTO 13 
118eLBL [1 
111 TONE 7 
112 TONE 6 


113 *DEBIT INPOSSIBL* 


114 HE" 
115 AVIER 
116 1 

117 ST- 89 
118 GTO 84 
11SeLBL 13 


128 “UN IHSTANT..." 


121 AYIEH 
122 18 

123 ST0 83 
124 RCL 18 
125 :43353 
126 : 

127 STO 18 
1284BL 15 
129 RCL 13 
138 RCL 14 
131 - 

132 .881 
133 XCY 
134 K<Y? 
135 GTO 24 
136 KCY 
137 RCL 83 
138 K€Y? 
139 GTD 84 
148 STO 84 
141 RCL 13 
142 RCL 18 
143 RCL @4 
144 + 

145 RCL 14 
146 + 

147 K€=Y7 
148 GTO 19 
149 RCL 13 
158 RCL 14 
151 - 

152 RCL 18 
193 

134 STO 84 
199eLBL 19 
156 EG 55 
157 REL 86 
138 X<=8? 
159 GTO 39 
168 RCL 16 
161 K<B? 
162 GTO 21 
163 XEG 63 
164 GTO 15 
163eLBL 21 
166 RCL 18 
167 x247 
168 GTO 43 
169 XEQ 63 
178 GTO 15 
171eLBL 24 
172 BEEP 
173 SF 45 
174 FIX 3 


175 “PANNE DE CARBUR* 


176 “HANT APRES" 
177 AYIEN 

178 “+ 

179 ARCL 12 


188 "+ SEC." 
181 AVIEN 
182 PSE 
183 RCL 81 
184 RL 07 
185 2 

186 + 

197 + 

188 RCL 18 
189 äte 
198 + 

191 SQRT 
192 RCL 18 
193 - 

1934 RCL 67 
195 

196 STQ 64 
197 RCL 87 
198 + 

199 ST+ 18 
98 REL 64 
281 ST+ 12 
e2eLEL 27 
203 FC2C 65 
è@4 BEEP 
285 FIX 3 
286 RCL 18 
287 3688 
288 * 

249 STD 45 


218 “SUR LA LUHE EN * 


211 AVIEN 
212 ARCL 12 
213 “+ SEC.” 
214 AYIEN 
215 PSE 


216 “VITESSE AU COXT- 


217 “HACT:" 
218 AYIEN 
219 RCL 85 
228 1,689 
221 * 

222 fIRCL À 
223 “+ KW/H° 
224 AYIEN 
225 PSE 


226 “FUEL RESTANT :* 


227 FIX @ 
228 RCL 13 
229 RCL 14 
238 - 

231 ,43399 
232 * 

233 ARCL * 
234 “+ KG° 
235 AYIEN 
236 PSE 
237 1 

238 RCL 85 
239 KCY? 
248 GTO 29 
241 18 

242 KV? 
243 GTO 31 
244 KOY 
245 29 

246 K2V? 
247 GT0 33 
248 #OY 
249 68 
258 X)Y? 
251 GTO 34 
292 TONE 6 
293 TOHE 6 
254 TOHE 6 
253 TOHE 5 


256 “DESOLE, AUCUN S” 


297 “HURYIVANT" 
258 PROMPT 

259 GTO 88 
268eLBL 29 

261 BEEP 

262 BEEP 

263 BEEP 

264 BEEP 


265 "ALUNISSAGE PARF" 


266 "HAIT" 
267 PROMPT 
268 GTO 68 
269eLBL 31 
278 BEEP 
271 BEEP 
872 BEEP 


273 “ASSEZ BON ALUNI” 


274 “HSSAGE" 
273 PROMPT 
276 GTD 88 
277#LBL 33 
278 BEEP 


279 BEEP 
288 “ALUNISSAGE DOUT* 
281 “HEUX" 
282 PRONPT 
283 GTO 88 
284eLBL 34 
285 BEEP 
286 "HATERIEL ENDOHN* 
287 “HAGE." 
288 AYIEN 
289 PSE 
298 “BONNE CHANCE PQ° 
291 AYIEN 
292 “HUR LE RETOUR" 
293 PROMPT 
294 GTO 88 
299eLBL 39 
296 ,885 
297 RCL 84 
298 K<Y? 
299 GTO 27 
396 RCL 48 
381 RCL 18 
382 + 

383 RCL 13 
384 / 

385 CHS 
386 RCL 87 
387 + 

388 2 

389 * 

318 RCL 41 
311 * 

312 RCL 18 
313 Kt2 
314 + 

315 SORT 
316 REL 18 
317 + 

318 1/X 
3192 

308 + 

321 RCL 81 
322 + 

323 510 84 
324 XEQ 55 
325 XEQ 63 
326 GT0 39 
327eLBL 43 
328 REL 68 
329 RCL 18 
336 + 

331 1/4 
332 RCL 47 
333 * 

334 RCL 13 
335 + 

336 CHS 
337 1 

338 + 

339 ? 

348 / 

341 STO 65 
342 xt2 
343 RCL 18 
344 + 

345 SORT 
346 RCL 45 
347 + 

348 RCL 18 
349 * 

356 RCL 88 
351 + 

352 1/X 
353 RCL 18 
354 * 

355 RL 13 
356 + 

334 :9 

358 + 

359 5T0 84 
360 XEQ 55 
361 RCL 86 
362 X{=4? 
363 GT0 39 
364 KEQ 63 
365 RCL 18 
366 K(=0? 
362 GTO 15 
368 RCL 16 
369 (8? 
370 GT0 43 
371 GTO 15 
372eLBL 55 
373 RCL 44 
374 RCL 18 
379 * 

376 RCL 13 
377 4 


378 STO 88 
379 1 E-7 
388 K(=7? 
391 GTO 57 
382 CLX 
393 STO 88 
34eLBL 57 
395 RCL 88 
396 5 

307 YtX 
388 5 

389 / 

398 RCL 88 
391 4 

392 YtX 
393 4 

394 / 

395 + 

396 RCL 68 
397 3 

398 Yt# 
399 3 

488 / 

481 + 

442 RCL 88 
483 xt2 
484 2 

485 / 

496 + 

487 RL 88 
488 + 

489 CHS 
418 RCL 88 
ai + 

412 RCL 87 
413 REL 84 
44 + 

415 + 

416 RCL 18 
417 + 

418 STO 16 
419 RCL 88 
428 5 

421 Y1X 
422 30 

423 / 

424 RCL 68 
425 4 

426 YtX 
427 

428 / 

429 + 

438 RCL 68 
431 3 

432 YtX 
433 12 

444 / 

435 + 

436 RCL 68 
437 12 
438 6 

439 / 

448 + 

441 RL 88 
442 2 

443 / 

444 + 

445 RCL 84 
446 RCL 88 
447 + 

448 + 

449 REL 64 
458 RCL 18 
451 * 

452 - 

453 RCL 87 
454 RCL 84 
455 x+2 
456 + 

457 2 

458 / 

459 - 

468 REL 81 
461 + 

462 STO 66 
463 RTH 
46A4OLEL 63 
465 REL 44 
466 ST+ 12 
467 ST- 83 
468 RCL 18 
469 + 

478 ST- 13 
471 RCL 96 
472 STO 81 
473 RL 16 
474 STO 18 
475 RTH 
476 .EXB. 


* * 


Daniel CONNAN ( T 154 ) Pantin, le 14 Déc. 1981. 
Monsieur, 

J'ai bien reçu les anciens numéros de P.P.C.T, 
pour ma mise à jour personnelle. 

Quelques mots pour vous préciser dans quel es- 
prit je compte faire un bout de chemin avec vous. 

J'ai cinquante ans, et comme bagage universitaire 
le bon vieux "certif" des familles, c'est-à-dire que mon 
savoir est comme le gruyère, beaucoup de trous. Dans ce 
monde où tout tend à s'uniformiser, je n'ai à ma portée 
comme territoireà explorer, que la "Terra Incognita" des 
maths. Manquant de bases, je fais ce que l'on pourrait 
appeler des “maths sauvages", je fracture les formules 
au petit bonheur, et pour cela, le HP 34 C est un mer- 
veilleux outil, dont, pour l'instant, je ne vois pas la 
fin > 
Pour vous montrer mon bon vouloir, je vous commu- 
quatre programmes, dont deux sont de mon crû, et 
les autres des adaptations HP 34 C de programmes prévus 
pour d'autres machines : ellipse centrée, suite de 
Euler, aiguilles de Buffon, mise en fractions de nombres 
fractionnaires . Pour l'ellipse centrée, avec l'aide 
de la formule de l'ellipse générale trouvée dans un livré, 
je voulais''domestiquer"cette courbe qui avait tendance 
à se promener un peu partout autour des deux axes X et Ye 
le programme étant surtout basé sur la valeur de "a" dont 
tout dépend . Les aiguilles de Büffon est la transcription 
du programme HP #1 de l'Ordinateur de poche. J'ai seule- 
ment fait apparaitre la valeur de pi, ce qui est à mes 
yeux plus parlant. La suite de Euler dont je n'ai stricte- 
ment pas l'usage, c'est seulement pour clarifier cet en- 
semble de symboles très touffu à première vue. Mais cela 
déja été dit, :"c'est bien plus beau lorsque c'est inutile 

Je comptais vous demander des éclaircissements sur 

1e PGM ‘nombres fractionnaires" de PPC T N° 1 page 16, 
mais ayant lu qu'on y arrivait avec le PGCD, je suis 
Jrvenu à le mettre en forme pour le HP 34C, et il tourne. 
| Jrai commandé le livre de maths que vous avez 
signalé par ailleurs. 

Je ne pense pas vous suivre sur le terrain du 
HP 41 et de ses nombreux et coûteux accessoirese 


nique 


Avec toute ma sypathie quand même. 
Daniel CONNAN (T 134). 
( Le même numéro que le pointage à mon travail!, 
toujours les lois du hasard! . /° 


FS  Lerogrenme PU? Juclo dun @ GA 
sua pates eÂ Ganmlandins Lis 
avec Lun dS cobiubtes ae La eÂr.ao 
+ A à L/urnaget « 


Les programmes joints n'étatent pas tapés 
nt, semble-t-il tout à fait au point. je peux envt- 
sager de publier des programmes manuscrits pour des 
machines sans imprimante, mats par pttté, écrits trés 
tstblement, en NOIR untquement et sur du papier HP 
ou quadrtilé 5x5 pour ne pas prendre trop de place. 

J'at fatt une exception tet, je ne La refe- 
rat pas. Pourtant je tiens beaucoup à publier des pro- 
grammes pour d'autres machines que la 41C. 


MISE anFRACTIONS de 
NOMBRES FRACTIONNAIRE 


S ...Je t'envoie aussi trois programmes (TEL, 


FRAC. 
STo 4 


AO | 
AA 


OAIH| LOLR 
02 STo © 
0% A AZI 
ou STOA |AS RCL 4 
of S TO Z 4 ee X 
06 ACLO  l1S A 
o%lw| inT AG Gi 
08 STo 3 AY sTou 
09 REL O AS A 
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LOL 6 


STO 
ReL 6 


sTo 5 
TO A 


STOXA |  u6 
A 
© u+ 
sTOox 


k«cu & 

FRAC 

L=O 

To oO 
aTOo 6 
LéL © 
«cu 4 
STO $ 
LOL À 
«ect Z 
L20O 

QtTOo Z 
sToe |6 
«cs 
ke 


Œ 


INT 


CO 
«cs 


a |: 
eus 


© al | 





Los 
STO + 

LOL 3 
RCL 4 
RCL + 
Fe 
RCL A 
keL + 
ACL 
KRCL9 





Mode d'emploi: Entrer le programme- affi- 
cher le nombre, appuyer sur A: le programme affiche 
en premter le numérateur, en second le dénominateur. 

On peut rappeler le numérateur en fatsant 
x<>y. 


*# * 


PTEL, MEMBER). 

Le premier (TEL) utilise le module Time. 

Il permet de calculer le prix de revient d'une com- 
munication téléphonique; il suffit de rentrer le numé- 
ro de zone (de 1 à 6) dans laquelle va être établie 

la communication téléphonique, puis de faire R/S lorc- 
qu'elle est établie. Le programme calcule alors le 

coût en tenant compte des demi-tarifs et l'affiche 

au fur et à mesure; un TONE 9 retentit tous les 1 francs 
et un BEEP tous les 5 francs. 

Le second programme (PTEL) permet d'impri- 
mer les données correspondant à l'appel effectué. Les 
lignes 22 et 31 sont synthétiques et ont été rentrées 
à l'aide du lecteur optique et du tableau de PPC V7 
N5 p23; elles auraient pu l'être par tout autre moy- 
en (LB, Byte Jumper, CRIC,etc...). 

Le troisiéme (MEMBER et SIGNE) me pose 
un probléme: que se passe-t-il avec l'imprimante à 
la ligne 39?!...Comment la lecture d'un programme peut- 
elle modifier l'état d'un drapeau?! Ces deux program- 
mes sont des applications des fonctions LG et BL de 
la PPC ROM (quel manuel!) et le résultat apparaït au 
‘ébut et à la fin de cette lettre. 


ractére de contrôle de 


4h. 
JEHL 1. 


ei MEMBER 8116 


Un des caractéres de 


ta ligne 39 est un ca- 
l'imprimante qui la fatt pas- 


ser en mode minuscule. Le flag n'est pas modifié dans 


La 41C 


AieLBl "TEL" 


ga FI4 à 
43 STOPSH 
f4 & 

AS SETSH 
86 CF 21 
47 5 

fe STO 44 
89 .4a7 
18+LBL 88 


11 CF IND 


12 ISG à 
13 GTO 48 
14,95 

15 STO 44 


16 “ZONE :laé. R/S* 


17 PROMPT 


18 SF IND x 


19 XEQ IND 
24 HR 

21 ST Bi 
22 8,48 
23 TIME 
e4 xCY? 
25 GTO 47 
26 19,3 
87 TIME 
28 #27? 
29 GTA 49 
39 DATE 
31 DON 

32 x=47 
33 GTQ 49 
34 6 

35 #7? 
36 GTO 47 
37 12, 

38 TIME 
39 x>Ÿ? 
44 GTA 493 
41eLBL 47 
42 “APPEL 
43 AYIEN 
da 5TOP 
43 RUNSH 
46oLBL 88 
47 RCLSH 
48 ST0 45 
45 HR 

Ja RCL 
91 / 

Je RCL 88 
53 * 

54 * - 
53 AREL X 
56 "+ F° 
57 AYIEH 
38 ST0 #2 
59 RCL 43 
64 STO Ÿ 
6i RÈL 82 
6è INT 

63 510 83 
64 HT? 
63 TONE 9 
66 =? 
67 GTO 48 
68 RCL 83 
69 RCL A4 
74 K#Ÿ? 
71 GTO 88 
T2 BEEP 
F3 RCL 43 
F4 à 

F3 ST+ 4 
F6 GTO 48 
FreLBL A1 
78 .AA12 
79 RTN 
S4eLBL 42 
51 4824 
82 RTH 
83eLBL A3 
84 4845 


# 


, R/S" 


mats dtrectement dans l' 


85 RTK 
86eLBL 44 
37 4472 
88 RTN 
89+LBL 85 
54 ,4120 
91 RTK 
9e+LEL 86 
93 “DUREE TAXE ?° 
G4 PROMPT 
95 HR 
96 ST 41 
97 GTO 87 
98eLBL 49 
99 2 
184 STx A1 
A1 STO 47 
182 END 


f1eLBL “PTEL" 
4e SF 21 

43 3 

84 STO 43 
45 FIX 4 

86 885 
A7+LBL 4û 
48 FS? [ND x 
49 GTO 41 
14 I5G x 

11 GTO 88 
12eLEL A 
13 SF 12 

14 CF 13 

{5 “APPEL 2OHE * 
16 ARCL K 
17 FRA 

18 4DY 

19 FIX 6 

28 CF 12 

21 SF 13 

22 “Etabli le : ” 
23 DATE 

24 ADATE 

25 PRA 

26 “duree : « 
27 RCL 85 
28 ATIME 

29 PRA 

39 FIX 8 

31 “Noabre d'unites® 
Jeep * 
33 RCL 45 
34 HR 

35 RCL 81 

36 / 

37 RKD 

38 STO 44 
39+LBL 842 
4h 18 

41 7 

42 INT 

43 x=A? 

44 GTO 43 
45 1 

46 ST- 43 
47 GTQ 42 
d8eLEL 43 
49 1 E3 

54 ST/ 43 
SieLEL dé 
52 “+ 

53 156 43 
54 GTO A4 
55 ARCL 44 
56 PRA 

57 AI 

58 CF 13 

59 SF 12 

68 FIX 2 

61 “PRIK : 


imprimante. 


62 ACA 

63 RCL 44 
64 RCL 48 
65 * 

66 CF 12 
67 ACX 

68 AD 

69 ADY 

F4 AY 

71 ADY 

72 ADY 

fs ADV 

t4 END 


fleLBL "MEMBER" 
gè SF 12 

83 CF 13 

84 SROM "LG" 
AS CF i2 

%6 * MEMBER 8116” 
87 ACA 

88 PRBUF 

49 KROM "PO" 
14 STOP 

{1eLBL “SIGNE” 
12 CF 12 

13 CF 13 

j4 EG I 

15 CF 12 

16 CLA 

17 = - 
18 ACA 

19 XEQ A 

28 CF 12 

21 ELA 

28 = - 
23 ACA 

24 XE8 E 

es CF 12 

26 CLA 

êt a « 

28 ACA 

29 XEQ € 

38 XEQ D 

31 KROM “PO” 
32 RTN 

33eLBL À 

34 5F 12 

35 “Hée+at” 

36 RCL T 

32 ACSPEC 

38 "8l'" 

39 rcl 

48 acspec 

41 “064 

4 rcl 

43 acspec 

44 prhuf 

45 rtn 

dé+ibi b 

4? ct 12 

48 “jehl à." 
49 aca 

56 orbuf 

5 rtn 

Seelbl © 

53 sf 12 

54 xron "13" 
5 ct 12 

56 *  aenber 2116" 
57 aca 

56 vrbuf 
59 rtn 
686lbl d 
6i adv 

6ê cla 

63 sf {2 
bé Commmemmme—— 
69 pra 

66 adv 

67 end 
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APPEL ZONE 1 


etabli le : 11.49.1992 
duree : 48: 24:56.84 
noabre d'unites : 62 


PRIX : 34,18 


* * 


Cher DODIN, 

Aprés m'être acclimaté au temps écossais 
je vous envoie le programme DISBIN qui permet de cal- 
culer le nombre théorique de plateaux d'une colonne 
à distiller. 

Ce programme utilise les hypothéses de Lewis 
(débit moléculaire constant}. Il tient compte de l'idé- 
alité des mélanges (méthode de Wilson). Le calcul du 
reflux minimum (R mini) ne tient pas compte d'un é- 
ventuel point d'inflexion de la courbe y=£f(x). 

Cependant un test affichant R<Rmin détecte 
une construction impossible. Si l'alimentation est 
autre que liquide bouillant, le calcul peut être long. 

Les calculs sont faits pour une mole d'ali- 
mentation. La loi d'Antoine demande log; . Le program- 
me fait 1220 bytes (avec un module quadri size 145) 

KEQ"DISBIN" 

répondre à l'affichage R/S 

Quand la 41 affiche 3"30 IYP!(3heure 30 
SVP) c'est le temps approximatif qu'il lui faut pour 
calculer les constantes et le refluxmini. 

Donc au bout de ce temps, elle affiche 
Rmin. R/S et donner R(reflux adopté)R/S.Le program- 
me vous donne alors D et W (faire R/S à chaque fois). 

Puis le calcul continue en calculant les 
étages théoriques. 

Etage épuisement (Tone aigu) jusqu'a l'a- 
limentation puis étages concentration (Tone grave). 

À la fin du programme, la #1 vous rappelle 
le nombre d'étages R/S puis le numéro du plateau d'ali- 
mentation. 

Attention: le bouilleur= plateau N°1 

Si vous avez une imprimante, votre HP vous 
demandera de l'allumer pour afficher les plateaux avec 
leur composition et la température (imprimante sur 
NORM) 

Données: Xf:composition de l'alimentation (molaire) 


Xd composition du distillat (molaire) 

Xw composition du résidu (molaire) 

F.V. Fraction vaporisée de l'alimentation 

Al premier coefficient d'Antoine du + volatil 
B1 deuxiéme " " 

CI troisiéme " # 

idem pour A2,B2,C2, mais pour le moins volatil 

L12 coefficient de Wilson 

L21 id 


N'oubliez pas d'introduire la pression de fonction- 
nement en mmHg (millimétres de mercure). 
PS: je ne suis pas le fondateur de ce programme, il 
m'a aimablement été donné par un chercheur du génie 
chimique. 

Si vous voulez avoir le nombre réel de 
plateaux appliquer cette formule 

NPR= NPT/E° 
NPR= nombre de plateaux réel 
NPT= nombre de plateaux théorique 
E° = efficacité 
E°= 0,17 - 0,616 log u 
u étant la viscosité du liquide en cPo (centipoise) 
1 pl (Poiseuille)=1 kg/m.s = 1Pa/s=1000 cPo 
Pour ma part je prend la viscosité du mélange liquide 
au dernier plateau (côté concentration). 
NB: le calcul de NPR est dans le programme 


J.L. Assié (T3) 


g1eLBL *T” 21 - ati 61 REL 11 
fa STD 22 22 CHS 62 REL 31 
93 RCL 21 23 REL 35 . 6 

43 RTH 63 + 
84 ENTER 24 + HOLBL -P- 64 + 
95 RL 34 25 ENTERT 

45 RCL 27 63 LH 
46 * 26 STO 12 

46 + 66 CAS 
47 STO 11 27 RCL 86 47 1/4 67 ST0 12 
88 RCL 45 28 STD 23 

: 48 RCL 26 68 RCL 31 
49 ST0 23 29 REL 88 49 * 69 REL 11 
{ 
18 REL 87 38 STD 26 n 7 
hs ’ 58 CHS = 
11 STO 26 31 RCL 18 Si RCL 23 71 RCL 21 
12 RCL 89 32 STO 27 52 + 72 + 
13 STO 27 33 RCL 22 53 18tK 73 14 
14 RCL 22 34 XEQ "P” 7 
ee 54 RTN 74 RCL 31 

15 KEG “P 35 RL {2 ss 75 * 
16 RCL {1 36 + As 
56 ! 76 RCL 32 
17 # 37 REL 11 57 - 7? ENTER 
18 570 ii 38 + 

58 CHS #8 RCL 21 
28 ! 48 / , 

68 REL 21 88 REL 11 


81 + 

82 1/X 

83 REL 32 
84 * 

85 - 

86 REL !{ 
97 * 

98 REL 12 
89 + 

94 EtX 

91 STO 34 
ga REL 21 
93 RCL 32 
G4 + 

95 REL 11 
96 + 

97 LN 

98 CHS 

94 STO 12 
184 REL 11 
181 RL 31 
182 # 

{83 RCL 21 
184 + 

145 1/X 
186 RCL 31 
187 + 

188 REL 21 
189 ENTER 
118 RCL 32 
iii * 

112 REL fi 
113 + 

114 178 
115 RL 38 
116 + 

117 - 

118 REL 21 
119 # 

128 CHS 
121 RCL 12 
122 + 

123 Etx 
{24 STD 35 
125 RTK 
126eLBL “YER" 
127 ST0 21 
128 XEG “GAN* 
129 RCL 14 
138 STO 36 
131 RCL 15 
132 ST0 37 
133 XER “RAC” 
134 RCL 85 
135 STO 23 
136 RCL 87 
137 STO 26 
138 REL 89 
139 STD 27 
148 REL 25 
141 XEQ “P” 
142 RCL 13 
143 

144 RCL 21 
145 + 

146 RCL 34 
147 * 

148 STD 38 
149 RTN 
158eLBL °DISBIN" 
151 “RF?" 
152 PROMPT 
153 STO 43 
154 “XD?" 
155 PROMPT 
156 STO 81 
157 “xW?° 
158 PROMPT 
159 STD 82 
168 “FV?" 
161 PROMPT 
162 STO 84 
163 “A1?° 
164 PROMPT 
165 STO 85 
166 “B1?" 
167 PROMPT 
168 STO 87 
169 “C12* 
{74 PROMPT 
171 STO 49 
{72 “A22* 
173 PROMPT 
174 STO 86 
175 *82?* 
176 PROMPT 
177 STO 88 
178 "C2?" 


179 PROMPT 
188 STO 16 
181 “P MHHG?" 
182 PROMPT 
183 STO 13 
184 "L127" 
185 PROMPT 
186 STQ 31 
187 “L217° 
188 PROMPT 
189 STD 32 
198 F5? 21 
191 SF 88 
192 * 3-38 I.T.P !* 
193 RCL d 
194 AYIEH 
195 5T0 d 
196 RCL 13 
197 LOG 
198 RCL 85 
159 = 

284 RCL 87 
281 
L'EU 
283 CHS 
284 RCL 69 
205 = 

286 570 i4 
287 RCL 13 
288 LOG 
289 RCL 86 
218 - 

211 REL 88 
212 7 

213 1/X 
214 CHS 
215 RCL 18 
216 - 

217 STO 15 
218 RCL @4 
219 x=9? 
228 KEQ 77 
221 GTO 68 
222eLBL 61 
223 RCL 38 
e24 RCL 81 
225; — 

226 ENTER 
227 RCL 81 
228 RCL 18 
229 = 

238 

231 CHS 
232 ENTER 
233 ENTER 
234 1 

233 - 

236 / 

237 CHS 
238 FS? 64 
239 XER 65 
244 TOHE à 
241 "RHIN" 
242 XEQ 88 
243 "R?" 
244 PROMPT 
245 STO 88 
246 RCL 83 
247 RCL 82 
248 - 

249 RCL 81 
258 ENTERT 
251 RCL 82 
202 

233 / 

254 STD 16 
255 "D" 
256 XEQ 88 
257 Î 

258 - 

239 CHS 
268 “W° 
è61 ST0 17 
262 XEQ 88 
263 F5? 98 
264 KEQ "L° 
265 RCL 84 
266 x=97 
267 GTO 78 
268 RCL 81 
269 RCL 88 
278 1 

271 + 

e72 / 

273 RCL 83 
274 RCL 84 
275 / 


276 - 

277 ST0 18 
278 RCL 44 
279 | 

288 - 

281 RCL 44 
282 / 

283 RCL 48 
284 | 

285 + 

286 1/4 
287 RCL 68 
288 * 

289 - 

298 1/X 
291 RCL 18 
292 # 

293 ST0 18 
2946LBL 78 
295 XEQ "PLAT" 
236 ADY 
297 ADY 
298 RCL 28 
299 “NPT® 
388 FIX 4 
381 XEQ 58 
382 RCL 19 
363 “PLAT ALIM” 
384 XEQ 88 
385 * vCHEL)?" 
386 PROMPT 
387 LOG 
388 -,616 
389 * 

318 ,17 

311 + 

312 1/X 
313 RCL 28 
314 # 

315 “HPR° 
316 KEQ 88 
317 FS? 08 
318 XEQ “L° 
319 OFF 
32@+LBL 68 
321 “+=* 
332 ARCL X 
323 FS? 88 
324 PRA 
325 AVIEN 
326 PSE 
327 RTN 
328eLBL 77 
329 REL 43 
338 STO 18 
331 KEQ "YER* 
332 ST0 22 
333 GT0 61 
334eLBL 68 
335 ,45 

336 STO 38 
337 ,99 

338 ST0 39 
339 XEQ "RAC2" 
348 RCL 48 
341 STO 18 
342 GTO 61 
343eLBL "RAC?" 
344 RCL 38 
345 ST0 48 
346 XEQ “XI” 
347 STO 4i 
348 RCL 39 
349 XEQ "KI" 
358 STO 42 
351 RCL 4i 
392 + 

353 X)0? 
354 GTO 13 
355eLBL 14 
356 REL 39 
357 RCL 39 
358 RCL 38 
359 - 

368 RCL 42 
361 RL 41 
362 - 

363 / 

364 RCL 42 
365 + 

366 - 

367 STD 48 
368 XEG "KI" 
369 STO 43 
370 x=8? 
371 GTO 15 
372 ABS 


478 TONE 9 516 PRA 562 RCL 21 


373 1 E-3 421 TOHE 9 682 ASTO T 
374 #2 472 TOME 9 is 363 - 698 “T=" 
375 670 15 As 564 AES RC 
se ds Re 319 F5? 6 565 ENTER Re 
dd + 475 STO 15 521 RCL 28 567 #)Y? 611 F5? 48 
° 476 XEQ 98 52? STO 19 ‘ 612 PRA 
379 40? 472 RCL 68 368 GTO 9 613 AVIEN 
388 GTO 16 478 1 369 RCL 22 
524 1 Ë 614 CF 13 
381 RCL 39 479 + 505 4 en el 615 FS? 88 
382 STO 38 4gû RL 16 526 RL 34 371 GTO 83 616 XEQ “L” 
384 STO 41 ie 373 TOME 9 
482 RCL 84 528 RCL âi s : 618 RTN 
385eLBL 17 483 - 529 - PR. 619LBL "L" 
386 RCL 40 434 STO 22 530 RCL 88 F2 620 fe 
387 STO 39 485 RCL 34 54 / . Ji 621 SF 12 
+ . ’ 496 + 53 STO 21  … 7 622 “rxxzzrzxxzzx* 
487 RCL 17 SIILEL 63 S79 ARC X 623 PRA 
398 GTO 14 488 ENTERT 534 { Se FS2 06 624 CF 12 
mé gRe Bras sm Sie 
393 ST/ 41 "ie 582 AVIEN 627 “PRINTER ox” 
394 GTO 17 nr 337 XEQ "VEN" 5g3 RTM & 
nr. 492 RCL 22 538 TOME ? Se 28 RD 
ne 4 EEE 539 TÜXE 7 585 AIN ne 
397 PROMPT + ” ARS me" Far Eat $TO # 
398eLBL 15 4% / nue 387 FIX 8 632 XEQ “YE0" 
399 RTK Rp 368 ARCL 28 633 RL a 
48@eLBL. “RACL" hit Ur 389 F5? 98 634 RCL 83 
di RE 498 RCL 2! 544 ST0 15 590 PRA 3 
db 10 2 . 345 XEQ % 591 AVIEM 
493 XEQ “T H EEE nue 392 PSE pe s 
484 STO 28 582 1 E-4 di ui 393 FIX 4 a STO 28 
485 RCL 7 . 0 ne 71 594 SF 13 639 R 
SE 583 XV? 549 X=Y? “4 sr mm 
RE Me ed 358 GTO 89 596 RCL 21 A - 
488 STD 29 586 STO 21  . He 642 RL 84 
+89 RL 29 587 ENTER 593 ! qe 643 / 
411 187 pers ne 684 “Ÿ 645 .. i 
412 GTO 85 ue me 681 RCL 38 
413eLBL 08 511 GTO 81 557 RL 81 647 RCL 28 
414 RCL 37 S12LBL 82 5 - He 648 + 
416 RL M emne LS Fu: 658 EU 
417 - 515 FS? 68 he F6 PUR" Te 
418 REL 29 ‘ 561 ST0 22 
419 RCL 28 
ue # x 
nu Georgelin Daniel 
423 à 7 Avenue du General de Gaulle 
56170 Quiberon 
424 - un 
425 STO 25 Ce 
426 KEQ “T" Objet: programme donnant la liste des touches réassignées. 
427 STO 24 
428 x=0? 
429 GTO 86 
438 ABS 
431 1 E-5 LA: Liste des Assignations. 
432 h2Y? 
433 GTO 66 
se - Pourquoi? : Pour connaitre, au moment de l'exécution du 
programme, la liste de toutes les touches qui ont été 
436 * réassignées. 
. Le - eee : “ rappelant les registres e et , en les 
stockant en et e ë insi 
mu TT n testant le systeme de drapeaux aïnsi 
448 STD 3% - De quelle façon l'utiliser? : Simplement en le lançant 
441 REL 29 (XEQ LA), commence aiors à defiler la liste des codes 
442 STO 28 des touches réassignées. 
443eLBL 88 - Quels effets? : La pile, le registre alpha, le drapeau 
444 RCL 25 01, le format d'affichage et les mémoires 3,4,5 et 6 de 
445 STO 37 retour (RTM) ne sont pas conservés. 
446 RCL 24 - Quelles difficultés? : pas 10: F3 7F 90 20 : correspond 
. a au deux derniers octets du registre d. . 
ou RU pas 20: AD F6 
st © au , pas 30: 10 prend aussi deux 
mais est moins rapide. 
à “ : = ge ge : Ce programme est intéressant par sa rapidité 
e 1 
A à par sa taille(106 octets). 
454 “ERR COEF” AieLBL LA" 16 STO à 31 * 46 DSE à 
455 AYIEN 92 FIX 8 17 RL I 32 RIH 47 GT0 18 
456 STOP g3 SF ëi 18 ac) d 33 4=07 48 3 
457eLBL 66 4 REL 19+LBL 18 34 ETx 49 STD a 
458 RTN aSeLEL 09 28 FC? IND * 35 Rt 58 XC7 
459+LBL “PLAT" 46 STO L 21 GTD 1 36 + 51 DSE ] 
468 A @7 “+HABCDE" 22 XX) d 37 FC? 81 52 GTD if 
461 STO 24 gg REL * 33 RCL ] 38 CHS 53 > d 
462 RCL BE 89 ST0 [ 24 RL à 39 VIEN X 54 RIL & 
463 STO 21 +" 25 4 48 TOME 5 55 FS2C 81 
464eLBL 81 Ï 3 26 a=Ÿ? di XOY 56 GTO 89 
465 ! {2 STO x è7 DSE Z 42 &<> d 57 BEEP 
466 ST+ 28 135 28eLBL 48 43e BL il 59 .EXI. 
467 REL 21 14 ST0 1 29 RDN 44 ISG Y 
468 XEQ “YEQ" 15 4 3% El 45+LBL. 08 
469 TOME 9 PPC-T N 3 * k 
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X Reacrions 


Jacques SIRODOT 
9, rue Dusenbach (T105) 
67500 MARIENTHAL 


Cher Honsieur DCDIN, 


Le Club FFC deToulouse vient de m'appor- 
ter une grande bouffée d'oxysène en programmation grâce 
au journal qu'il édite de temps en temps; je pense que 
ce journal est le meilleur moyen de garder le contact 
avec le Club. 

À l'heure actuelle, je n'en suis qu'aux 
balbutiements de la programmation sur HP41. Au bout de 
iÜ mois de pratique (perdant mes heures de loisirs), je 
commence seulement à maîtriser quelques subtilités de 
la #HFk,; et je ne suis pas mécontent de moi! Mes livres 
de chevet sont L'Ordinateur de Poche et L'Ordinateur 
Individuel; ce sont les seuls documents rédigés en fran- 
çais et traitant des problèmes de la HP41 que j'aie 
trouvé. En effet, je ne parle pas un mot d'anglais; donc 
j'ignore totalement le contenu d'ouvrages tels que : 
“Synthetic programming of the HF41C" ou "Tips and routines" 
£xiste-t'il une traduction de ces ouvrages? Sinon quelqu! 
un aurait il le temps de réaliser une traduction en 
français de ces livres? (je ne connais pas le volume 
de documentation que celà représente); je suis sûr que 
de nombr:-ux adhérents du PPC seraient prêt à le dédom- 
mager de ses peines pour en avoir une traduction. 

Le sujet qui me tient le plus à cœur est 
la programmation synthéticue. J'ai fait mes premiers 
pas à l'aide de L'Ordinateur Individuel. Le CRIC a été 
mon premier outil de travail; il m'a permis programmer 
pratiquement toutes les fonctions synthétiques connues 
telles que : RCL M, STO Q, X<>d, etc... J'arrive égale- 
ment à enter une chaine de caractères avec majuscules 
et minuscules dans un programme (très intéressant lorsqu' 
on possède une imprimante). Mais à l'heure actuelle je 
ne parviens ras encore à programmer une chaine de carac- 
tères telle que : "@#8*i" (cf le prozramme de Lionel 
ANCELET :aru dans le N°1 de PPC-T). Quelle méthode 
employez vous pour entrer une telle chaine de caractères ? 
surtout lorsque leurs codes héxadécimaux sont compris 
entre 1C st 14 car ils sont t ujours précédés du carac- 
tère en forme de losange. D'autre part comment obtenez 
vous les caractères compris entre 1B et 1F ? Quelle est 
la fonction de ces chaines ie caractères synthétiques 
dans un programme ? Sur quoi agissent elles ? Pouquoi 
avoir chzisi ces caractères ? On peut poser les mêmes 
questions au sujet des fonctions synthétiques. Ceci 
fait beauccup de questions qui me viennent à l'esprit, 
mais que doivent se poser d'autre débutants faisant de 
la precramration synthétique comre moi, c'est à dire 
sans ccrrrendre, 

Depuis mon adhésion au PPC (Cctcbre 1982) 
j'ai découvert le "Byte Grabter!" srâce à un ami ânonnant 
l'anglais sui a vu déchiffrer l'article de Richard Nelson 
paru dans FFC-J VIN3. Suel est l'avantage du BG sur le 
CRIC ? (encore des questions !). Pourquoi font-elles 
le même travail bien qu'elles soient d'origine différente ? 

11 serait intéressant que quelqu'un de 
compétent et ayant du temps à n:us consacrer nous mette 
sur la voie, nous autres débutants, afin d'y voir un 
peu plus clair parmis tous les trésors que nous offre 
la HP41. Une fois lançés,je pense que nous pourrions 
ccntinuer et rédiger les articles faisant part de nos 
iécouvertes dans une page c:nsacrée aux néophytes. 

Je ne vous questionre pas encore sur 
l'utilité des MEPRCM" et micrococes car tout celà est 
pour moi du latin auquel je n'entends rien. 

Pouvez vous m'envoyer un jeu de 100 cartes 
magnétiques ? Ci-joint un Chèque de 200 F (réf: C7) 

Je souhaite longue vie au Club PPC de 
Toulouse ainsi qu'à son journal. Ccrdialement, et selon 
la coutume: "Bonne programmation!" 


Jaccues SIRCDOT (T105) 





Toici une vetite amélioration de l'excellent 
programme "LEN" d'Alain DELEBECQUE (T6 )verut dans 
PPC-T n92 et qui comote le nombre de caractères en 
Alvha. 

Bien que j'ai repris pas mal des idées d'Alain, 
ma version est très lifferente dans sa concention. 
Les améliorations ne vortent vas sur la longueur 
(‘15 octets au lieu de 116) hi sur la vitesse (!,2s 
environ)mais sur la possibilité de compter plus de 
24 caractères si l'on utilise les 4 octets inutilisés 
du registre P.De vlus ce programme permet,sous cer- 
taines conditions ïe tenir compte des points,des 
virgules etc... 

Pour cela j'utilise le fait que le second 
âigit (nyvble) de Q contient apres introduction d'une 
chaîne 2lvha,le nombre de caractères en plus de 13, 
ponctuation comprise. 


Ot LBL "LON" 33 13 
CF 08 + | Rata" 
ACL O | Suweltne du 28 gTO 02 


RCL P |canracleres de AfEa LBL 90 Cas <12 canadlers 
RCL à X()a 

RL N lan Pa pile x() 

RCL M FS?C 00 Dege age vers 


ASHF "1 becolge de La SF 04 1. 
ASHP (S ce Fe mens 40 FS?C 0! M re 


ps SF 0 1e d'œil de Q 

16 RD Séchage de HelN 2626 02 rt Bof 
dans PAPER. on 

STO P OA P pour SF 06 #2 

Lx JAbuem BR DR rs?c 03 | rrefé 

RCL SF 07 

RCD M| Tab Zi cames? O4 

X=Y? INT ; 

Je Da x()M "4 

x(0)0 STOL [fs 

ro | Féléwolie L co rx “ je re 

XOP H en ST+ M |* x de @ 
20 STO N CLX (Henci  Rfourn 

R? LAST x | 

R? | Rae de Q x()M 

ROL 9 


12 
FS? 081 Branchement _ | Bla 


GTO 00, smuvanl+ où - 12 cxxaclèus CES 
X()a LBL. 02 


CF 00 | Nmolhalion de RDN Rae Lee 

On 01 | © loue de 60 STO ? 2 P 

CF 02 1e d'at à #) RDN de Rhoh a 
30 CF 03 Ÿ STO_O 

X()ä X()Z 


INT 7 iolémenf ou 2€ diaiF 64 END 


REMARQUES :=LON ne compte la nonctuation que s'il y a 


plus de ‘2 caractères dans Alpha,arrangez vous pour 
que l'affichage scrolle (se déroule) si vous ARCLez 
des nombres.Choiïisissez un FIX suffisant par ex. 

-LON pose parfois des problèmes si il y a 
des blancs (space) dans Alpha et plus de 2 caract. 
Je ne sais pas pourquoi,si vous le sevez,écrivez moi. 

-LBL "LON" doit être changé en label num- 
erique si vous l'utilisez comme sous programme. 

-Si vous utilisez LON au clavier,faites: 
GTO "LON" ,introduisez votre chaîne,R/S.Ne faites 
jamais GTO(ou XEQ)Lon apres avoir introduit la chaîne 
sinon vous changez le contenu de Q! 

-Par programme,LON ne fonctionne bien 
qu'avec PROMPT,il1 donne parfois des resultats 
fantaisistes après AVIEW. 

Heureuse Programmation 





Gilles BARRET (9528 T 22) 


*# * * 


Cher monsieur, 


Bravo pour votre journal. Il est exellent et 
indispensable. Je joins à cette lettre des 
suggestions de routines en M-Code pour une 
future Toulrom. Souhaitant complèter mes 
connaissance en ce domaine, je vous commande 

P7. Je pense que qand toutes ces routines seront 
bien au point nous pourrons les intêgrer dans 
une Rom HP (8K?!1). En effet, les 250 nièces 
minima seront très largement dépassées si nous 
assurons une information suffisante (dans L'OI et 
PPC.). L'intéret de ces routine en M-Code est 
évident.Ill donne une nouvelle dimension à la 41, 
Hélas, je n'ai pas les moyens de me payer eprom 
box+programmeur (je pense que beaucoup sont dans 
le même cas.C'est .l'intérèdt-des-ROM:HP : pas be… 
soin d'acheter un interface), Le ProtoSystème à 
l'air bien mais cher et condamné à vivre avec la 
k1 (pas HP-IL...). L'EpromBox HP-IL de Mr Poupée 
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semble très intéressant. J'aimerais aveir plus 
d'informations à son sujet si possible. 

Dès que j'aurai un peu plus de temps, 
je ferai des routines en M-Code, mais étant dans 
l'impssibilité de les tester, vous les recevrez 
sans garanties...(si quelqu'un pouvait me prêter 
un MLDL ou similaire...) 


Votre livre à l'air formidable. je vous 
en commande un exemplaire. Je vous informe aussi 
(si vous n'êtes déjà au courant) que des membres 
de PPC Paris sont en train d'écrire unlilivre sur 
la programmation synthétique et un autre sur 
l'Xfunctions et 1'HP-IL, cependant,,je crois, en 
dehors de PPC. Ils contiennent des programmes 
extraordinaires ainsi que des découvertes inédi- 
tes dans PPC. Après une grosse lacune pendant 
deux ans, voici maitenant une abondance de livres 
sur la 41. Tant mieux. 


Qui a réalisé l'interrupteur acoustique 
décrit dans PPC VIN3 ? N'ayant pas suffisament 
de connaissances pratiques en electronique, je 
voudrais l'acheter tout fait. 

Amicalement, 


P,.S. Veuillez excuser mes fautes de frappe. 


Didier Cayrac Villeneuve, le 7/12/82 
22,Jules Ferry 
47300 VILLENEUVE s/LOT 


tel: (53) 70 91 03 (en cours d'acceptation) 


Les suggestions pour le mterocode n'étatent 
pas "présentables pour publication”. 

On peut à peu prés tout faire en mterocode, 
mais La moindre ligne de programme demande des heures 
de travail, ausst il ne faut pas trop espérer que les 
quelques programmeurs actuels pourront tout faire. Mais 
pour autant il est tout à fait souhattable de diffuser 
ce type de demande, afin que tout le monde puisse en 
discuter et qu'apparatssent au fil des disceusstons, 
d'une part les caractéristiques exactes qui sont sou- 
haitées et de nouveaux programmeurs, 

Done pour cette rubrique: "De nouvelles 
Fonctions pour notre HP", envoyez mot (sous Forme 
pubitable, SVP) vos propositions précises: que dott 
faire cette fonetion, comment est elle appelée du 
clavier, comment introdutt-on les données, comment 
les données doivent elles être retournées (montée de 
la pile, x en L, x écrasé?7)... 


ke + 
Rennes le 3/11/82 


Mon cher Jean Daniel, 


Merci d'avoir répondu à mes questions dans le 
n°1 de ppc-T.Je vous en soumet quelques autres, 
associées à une commande et quegues petits pro- 
-grammes. + 

-Est il possible d'éviter le saut papier 
sur les imprimantes HP-82143A ou HP-IL? à 

-La "SEIKOSHA GP 100A"peut elle etre ma 
nipulée simplement par la 41C,et peut on envisager 
de tracer des graphiques avec une résolution sati 
sfaisante?(J'ai posé déjà deux fois ce genre de 
questions à la société SICAPE,par courrier,mais 
je n'ai reçu aucune réponse à ce jour. 

-En quoi consiste exactement l'assem- 
bleur pour 41 sur 85 dont il est question dans 
FP-C TN n°12 ?Comment se le procurer ? 

-Lans le VIiN2,vous faites mention d'une 
rallonge de BUS réalisée trés simplement;est-ce 
à dire qu'il s'agit d'une simple mise en paralléle 
d'un plus ou moins grand nombre de prise pour mo- 
dules ? 

-L'interface vocale à laquelle s'intere 
sse F.Darin,ne pourrait elle pas être réalisée à 
partir d'une base telle que celle qui fut publiéé 
dans la revue "MICROSYSTEME" ?(il s'agit d'une 
extension tres puissante pilotée par un micro 
CDP 1802.) 

-Je suis interessé par la fourniture de & 
shémas mentionnés dans la dernière circulaire,afin 
de déterminer si je suis en mesure d'entreprendre 
la réalisation de quelques extensions. 

Ii me semble en effet vital de développer 
nos propres extensions,vu la politique commerciale 
que HP ne semble pas décidé à renier.(Dernier ex- 
emple en date,l4interface vidéo,proposée à un prix 


prohibitif!) PPC-T N 3 


la lettre est de Klein (T34) 


| | Pour éviter le saut de papier des anctennes 
imprimantes tl faut déplacer l'interrupteur de fin de 
course de la tête (et le remplacer, 11 y a alors deux 
interrupteurs commutables) ce qui a pour effet de ré- 
duire la course de la tête, on perd donc en largeur 

ce que l'on gagne en hauteur. Cette tr ansformation 
est trés populaire en allemagne où elle a été décrite 
dans le journal CCD. 

Hats 1l y a un autre risque, au cours des 
mantpulations on risque de briser Le fin cireuit im- 
primé qui sert de liaison entre la tête et la logique 
de commande. Mon correspondant en Allemagne me signa- 
Le qu'un nouveau montage a été trouvé qui conserve 
toute la longueur de la ligne, je vous en ferait part 
dés que j'aurai des détails. 

La SEIKOSHA GP LOOA est une imprimante 
graphique et peut donc tracer des grapiiques pour La 
41C, tt faut la commander avec des caractéres ASCII, 
par exemple code en x, XTOA (ou "DC") et OUTA. Je ne 
connats pas les détails. 

L'assembleur pour 41C publié dans PPCTY 
(Australte) était incomplet et incorrect et done non 
satisfaisant. Il m'en «a coûté plusteurs jours de tra- 
vatl pour m'en appercevotr. Dans "AF" je donne un 
assembleur sur 41C qui donne les codes 244 des ins- 
tructtons à partir du code déeimal des éléments, faci- 
Le à trouver en face de l'instruction dans les tableaux 
de "AF",. Une version utilisant les fonctions de TR-1C 
est en cours de mise au point, elle sera incorporée 
dans le ROM pour plus de commodité. 

La rallonge de bus est bien une simple mise 
en paralléle, simplement pourvue d'un interrupteur 
sur chaque ligne PWO (ligne 6) pour permettre La mise 


s 


hors circuit à volonté des mémoires vives (effet va- 


rtable sur les mémoires mortes. 

F.Dartitn avait dans l'idée une interface 
vocale beaucoup plus putssante que celles déja com- 
mercialisées,et décrite dans les documents prépara- 
toires de la East cost conférence (P2) à partir d'un 
synthétiseur de phonémes VOTRAX. Frédértite a des pro- 
blémes en ce moment et a besoin d'encouragements, é- 
ertvez lut! 

J'ai mis au point un "dossier HARDWARE" 


s 


qui sera fournt gratuttement à tout adhérent du club 
déstreux de fabriquer des accessoires pour le club 
(payants, bien sur) ce dosster est une photocopte de 
tout ce que je connats sur La question, mats sous 
forme brute, sans commentaires et donc formellement 
déconsettilé aux amateurs qui risquent des catastrophes. 
(réservé aux connatsseurs). 

Le nom de tous ceux qui demanderont ce 
dosster sera publié et vous pourrez Les contacter. 


C'est le cas pour l'instant de Bruno Klein 
(T34) et de Didier Jehl (T80). 


*# *# 


Monsieur, 


Voici en retour mon bulletin d'insciption au club PPC-T 
en complément du chèque de 80 Fr que je vous ai déjà envoyé. 


Je serai intéressé par l'animation au sein de PPC - T des 
utilisateurs amateurs ou professionnels du calculateur 41CY 
employé en topographie et en cartographie ,; ayant développé” 
pour lui un système informatique , notamment pour la saisie 
des observations de topométrie moderne avec logiciel de trace 
automatique direct . Une liste de géomètres intéressés par un 
tel système peut vous être envoyée dans le cadre d'une coopé - 
ration avec l'Association Française de Topographie. 


L' A.F.T. Lyon envoie déjà à ses membres demandeurs possédant 
une HP 41C avec lecteur de carte HP 82104 A, un ensemble de 

50 cartes magnétiques en prêt pour une semaine. Elles sont 
obtenues via un lecteur optique HP 821534 , pour éviter son 
achat au propriétaire des deux livrets HP I et II d'applica‘ion 
de topographie, en français. 


Veuillez me faire parvenir les documents suivants : 


- Au fond de la HP410C 80 Fr 
frais de port 10 
- Journal PPC-T 4 N° ancienne série © 30 
2 N° nouvelle série 20 
N° 3 nouvelle série = 15 


Total 155 Fr 
Ci-joint un chèque de 155 Fr et une enveloppe . 
En vous remerciant beaucoup pour le temps que vous me consacrer, 


je vous prie de croire Monsieur, en mes sentiments distingués. 


Yves ALAJQUANINE 108bis Ménom 69004 LYON 


Atlleurs dans ce numéro des extraits de 
É . D ipe L ' 
La notice de l'interface KERN, un beau travatli 
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* Nomas 


Not Manufacturer Supported 
Sans garantie du Fabricant 


Chers amis, 
J'ai promis que toutes les mises à jour de 
seraient publiées dans PPC-T. Ceci profitera 
ceux qui n'ont pas le livre qu'ä ceux qui l'ont. 
Ces mises à jour successives nécessiteront 
une modification de la pagination à chaque édition. 
Dans ces conditions je me réfèrerai aux numéros de 
chapitre plutôt qu'aux pages. Pour l'instant il n'y 
a qu'une édition, nous pouvons donc citer les pages! 
Bien sûr je ne mentionnerai pas les fautes 
d'orthographe, si vous les avez vues c'est inutile et 
si vous ne les avez pas vues, tant mieux pour moi. Le 
fait est que j'ai appris beaucoup de choses sur l'or- 
thographe depuis quelques temps. 


"AU FOND" 


autant à 


Chapitre I p4, à la suite de la Remarque importante: 


À SUIVRE: 

Ce livre ne vous apprendra pas tout, et 
loins de là, de la programmation de la 41C, quelle 
soit normale, synthétique ou en microcode. Ce n'est 
d'ailleurs pas son but. 

Il veut être un outil de base à partir du- 
quel chacun est libre d'élaborer ses propres applica- 
tions. Le meilleur moyen de progresser est d'échanger 
ses connaissances avec d'autres. C'est le but du club 
PPC et, particulièrement en ce qui nous concerne, de 
sa section française. 

Certes beaucoup de choses ont déja été trou- 
vées, mais des isolés les redécouvrent tous les jours 
et les sources sont souvent étrangères ou inaccessibles. 

Si vous avez apprécié ce livre, le club PPC 
est fait pour vous (adresses annexe III). 


Chapitre IL $SII.1, figure 1! 


La figure reproduite ici est issue d'une 
publication de 1979. Un accident récent ayant entrai- 
né le changement d'unité centrale de ma machine, j'ai 
eu la surprise de constater que beaucoup de composants 
ont disparu de cette plaquette, comme vous pouvez le 
voir sur le shéma ci-dessous. 


Gp 





Circuit logique d'une HP 41C 
Octobre 1982 


Figure {! 


Est-ce là la conséquence du nouveau mode RESET (cf V:5) 
ou d'une intégration plus poussée? Le fait est qu'il 
y a de la place sur la carte pour de futurs composants. 


11.3.4 
Quand on efface un assignement, les 3 oc- 


tets concernés ne sont pas immédiatement supprimés, 
seul l'octet donnant le code de la touche est remis 

à zéro (et l'index de touche baissé, dans les registres 
f ou c). Cet emplacement n'est même pas réutilisé par 
une nouvelle affectation, même sur la même touche ni 
par un PACK. Par contre il est supprimé par PK du 


PPC ROM. 
TTs3 
(à l'usage il semble que la disposition de 


la mémoire morte soit aussi malaïisés à comprendre que 
celle de la mémoire vive, d'où la carte ci-dessaus) 


4K ( de 000 à FFF) 


port à 


Um 


port 3 


port 2 


port 1 


ns 
mm 
Lo 
{ 
H 
tt 
Le 


Si branchés 
quelque soit 
le port 
utilisé 


(Imprimante) 
(Horloge) 


(Module de service) 


MEMOIRES 


INTERNES 


(Organisation particulière) 


aie 





Figure 6 Carte de la mémoire morte 


Chapitre III.3.b Instructions à Ll octet, en fin de $ 


L'octet F@, tout à fait en bas à gauche de 
la table est lui aussi une instruction d'un seul oc- 
tet. Compte tenu de sa parenté avec les lignes de tex- 
te, il sera étudié au S$III.3.b (chaines de caractéres) 

Les octets 1B et 1C représentent respecti- 
vement EEX et NEG. EEX est l'introduction d'un expo- 
sant et apparait sous la forme E (1 E2) dans un pro- 
gramme ou en alpha. 

NEG est l'effet de CHS agissant directement 
sur une entrée numérique (négation) comme le - de 
1 E-2 . Curieusement 25/CHS dans un programme est exé- 
cuté plus rapidement que -25 (avec le même effet). Al- 
lez savoir pourquoi ? (ne pas confondre avec la sous- 
traction). 


Figure IL 
Solution: RUN donne la solution: le code 


de contrôle est donné par le 2° caractére imprimé,à 
condition de le chercher dans la 2°moitié de la table. 
Aprés %, n'importe quel caractére de la 2°moitié de 

la table qui ne soit pas caractére de controle con- 
vient. 


IIL.3.e 

Si vous tapez XEQ "ALPHA" et que ALPHA est 
un programme en ROM, la HP au lieu d'XEQ écrit XROM" 
ALPHA'". 
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Fig. 13 
Le fonctionnement du Bvte Grabber dévoilé 


Faire aprés un Mémory Lost GTO.. et entrez 
le programme suivant: 
ENTER 
ENTER 
ENTER 
ENTER 
ENTER 
ENTER 
ENTER 
MABCDEFGH1IJ" 


(7 fois ENTER) 


IE © D 


FA suivi de 10 caractéres 
= ll caractéres 
En tenant compte des 3 octets du .END. vous 
avez donc rempli 7 + 11 + 3 = 21 octets = 3 registres 
Un KXEQ "PACK" vous l'assurera. 
Placez-vous sur la ligne 07 ENTER et effacez 


3 lignes vous voyez: 


+ ENTER 
BG_ vous voyez: 
CR EEK A BCD 


Que se passe-t-il? Quand vous voulez introduire une 


fonction en mémoire La 41C sait (croit savoir !) que 
cette fonction occupe au plus 3 octets (il y a une fon- 
ction de 3 octets qui peut être assignée, c'est la 
fonction END; en fait seul l'octet CO figure dans le 
registre d'assignement, mais les octets suivants sont 
construits au moment de l'introduction de la fonction 
en mémoire ). Si il n'y a pas assez de place disponible 
pour introduire la fonction souhaitée, la 41C libère 

un registre entier, donc 7 octets, ce qui lui parait 
plus que suffisant pour loger une instruction qui ne 
peut en faire que 3. 

Mais le 8yte Grabber a deux caractéristiques: 
c'est une fonction de trais octets et il place en mé- 
moire un octet F7. La chaine de caractères suivante con- 
tient donc 7 caractéres. Examinons les différents cas: 

1) aucun octet n'est libre. La HP libère 1 
registre et place le BG ä gauche de ce registre. La 
chaine ainsi créée comprend F7, les 6 octets suivants 
du registre et Ll octet du registre suivant, l'octet 
volé. C'est le cas habituel d'utilisation. 

2) Un seul octet est libxre. Le F7 s'y place, 
la chaine occupe le registre suivant, libéré pour ce- 
13, rien n'est volé mais tous les octets nuls ont été 
recouverts et on se retrouve dans le cas N°1, 

3) 2 octets sont libres. Le F7 s'y place, 

La chaîne occupe le registre suivant, mais reste un 
octet nul, nous nous retrouvons donc dans le cas N°2 

4) 3 octets sont libres. Cela suffit pour 
le Byte Grabber (n'oubliez pas que le 3yte Grabber est 
une fonction qui recopie en mémoire les 3 octets con- 
tenus dans le registre d'assignement correspondant), 
du coup aucun registre n'est libéré et le BG vole 5 
caractères. C'est le cas expérimenté ci-dessus. 

Si on augmente le nombre de nuls, on peut 
choisir entre O et 5 le nombre de caractéres volés. 


v.1 
SE Vous vous êtes sans doute demandé pourquoi 
on voit apparaitre une ligne 4094 au cours de la cré- 
ation du BG. 

En fait au cours d'un programme, La HP ne 
calcule pas les numéros de ligne de programme, elle 
n'en a pas besoin. Mais si on arrète le programme pour 
le regarder elle doit tout recalculer. Pour se sou- 
venir de la nécessité de ce calcul elle place dans le 
registre e le n° de ligne FFF. 

Or FFF vaut 4095 en décimal. Dans le pro- 
cessus de création du BG, au moment ou nous effaçons 
le LBL "T", la HP recule d'une ligne à partir de FFF 
sans s' apercevoir que ce numéro est invalide, d'où 


4095 - 1 = 4094. 


V.4 





La séquence LBL'"++"/+/+/+... XEQ "LB" est 
laborieuse à introduire. Pensez à La copier sur car- 
te; il suffit alors de travailler sur le dernier pro- 
gramme (le END est le .END.) et de placer la séquence 
en faisant XEQ "MRG". Vous découvrirez peut-être ain- 
si cette fonction si utile du lecteur de cartes. 
L'entrée des GTO -- à 3 octets se fait 
pour LB en rentrant les valeurs décimales 208/9/60 à 
127 (numéro du label). N'essayez pas d'assigner ces 
valeurs, sinon il vous faudra lire le prochain $! 


Compléments sur les XROM: 

On peut s'étonner que j'indique comme préfixe 
des XROM un nombre de 5 bits. Ceci est du au fait que 
les XROM n'utilisent que la moitié de la ligne A, le 
5° bit est donc toujours nul. 


Cependant il nous faut parler ici d'un phéno- 
méne particulier qui est celui des affichages de XROM 
synthétiques. 

Vous verrez (V.3) un programme qui vous per- 
mettra d'assigner à une touche n'importe quelle paire 
de codes qui viendront alors se placer dans les regis- 
tres d'assignement aux emplacements prévus pour les 
codes de fonction. 

Les seules fonctions qui peuvent légalement 
‘occuper deux octets dans les registres d'assignement 
sont les fonctions XROM. Quand la HP lit une fonction 
assignée, le programme ch rgé d'afficher le nom de la 
fonction se contente de vérifier que le premier digit 
de la fonction est différent de O et affiche alors un 
auméro KROM calculé à partir des 3 digits suivants. 

La HP suppose (bètement ?) que si le premier 
digit est # O il ne peut être que A. Le même message 
XROM -,- correspond donc à 15 fonctions (premier di- 
git compris entre L et F). Ce type d'XROM (qui s'af- 
fiche mais ne s'inscrit pas dans un programme) peut 
donc apparaitre jusqu'à KROM 63,63. 

Si x est la valeur décimale du premier oc- 
tet de la fonction et y La vale-ur du deuxiéme octet, 
XROM i,j est calculé par: 

Î = à (x MOD 16) + INT (y/64) 

j = y MOD 64 
On peut déduire de cette formule une méthode pour 
trouver sans calcul le N°XROM à partir de La table 
des codes (méthode décrite par Keith Jarett). 

Pour connaître le numéro KROM d'une instruc- 
tion (ST+IND M par exemple), voir que ST+ (le premier 
octet) est dans la même colonne (2) que XR3-11, en 
effet le n°de colonne n'est autre que le code de l'ins- 
truction modulo 16; donc nous avons un XROM 8,9,10 
ou LLl selon le deuxiéme octet du code de l'instruction 
(IND M). Les lignes horizontales épaisses séparent la 
table en 4 zones horizontales qui correspondent res- 
pectivement au numéro. Ici la première zone corres- 
pond à XROM 08,-, la deuxiéme ä XROM 09,-, la troisié- 
me à XROM 10,-, la quatrième à XROM Il,- . 

La deuxiëême partie du XROM est donnée par 
la position de l'instruction dans la zone. Cette po- 
sition est Le numéro de La case dans la première zone 
un simple report à la première zone permet de le con- 
naitre quand le code vient des zones 2, 3 ou #. Ici 
IND M a le numéro 53. 

ST+ IND M sera donc XROM 11,53 

De la même façon, si vous assignez avec le 
programme KA (chap V) ADV IND e , donc 143/255 (déci- 
mal) vous aurez à l'affichage KROM 63,63 et en pro- 
gramme ADV,tout simplement. Bien sur ADV IXD e n'a 
aucun sens, et de plus l'usage de la table n'est pas 
si commode pour les XROM supérieurs à 31 . 


Figtit 


Commentaires sur le programme KA: 


La ligne 03 est "ASSIGNEZ 2 T" pour ‘'assi- 
gnez 2 touches". Vous devez alors assigner une fonction 
quelconque aux deux touches que vous comptez utiliser 
(assigner) avec le programme. Ceci a pour résultat de 
lever les index de touche dans le registre e (ou +) 
et de placer un remplissage dans le registre OC0,rem- 
plissage que KA va remplacer par les assignements dé- 
finitifs. 

Deux assignernents intéressants: le BG et 
eGOBEEP. 

Le BG que nous avons créé place dans le re- 
gistre d'assignement les octets F7 et 3F (décimaux 
247/63), mais essayez d'assigner F7/80 (247/128). A 
même XROM, même affichage, ici avec le lecteur de car- 
tes vous avez apparition de CARD READER, une iden- 
tification commode. 


eGOBEEP est l'assignement xx/167, xx étant 
compris entre O et F (O0 à 15 décimal). C'est une fonc- 
tion imprévue comme le Byte Grabber. Cette fonction 
a la propriété de créer ( et éventuellement d'exé- 
cuter) les fonctions XROM 28 et 29 qui sont les fonc- 
tions de l'HP-IL lecteur de cassettes et contrôle et 
des imprimantes. 


Cette fonction affiche eG@BEEP - -. Si 
vous répondez par un chiffre de O0 à 4l, vous créez 
un XROM 28, chiffre qui correspond à L'HP-IL. Par 
exemple le nombre 12 donne XROM 28,12 qui est la fonc- 
tion RENAME. Si IL est présente ainsi que le lecteur 
de cassettes cette fonction s'exécute (ou s'inscrit 
RENAME dans un programme) sinon on a NONEXISTENT (ou 
XROM 28,12 dans un programme). 
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Entre 42 et 63 il n'y a pas de fonction 
pour répondre. De 64 à 89 on obtient XROM 29,(chif- 
fre - 64), en quelque sorte il faut faire une retenue 
et on a les fonctions de l'imprimante. 


Attention, 89 est FMT (FORMAT) et n'existe 


que sur l'HP-IL; de plus on peut ainsi "exécuter" les 
titres MASS STORAGE ou PRINTER... avec des fortunes 
diverses, généralement mauvaises. 


MICROCODE 


La connaissance parfaite des modules mi- 
crocodes internes de la 41C est indispensable à une 
bonne programmation en microcode. Cette connaissance 
est facilitée depuis peu par le don par HP d'une copie 
du listage d'origine de ces modules, commenté ligne 
par ligne. Gros de prés de 400 pages ce listage est 
disponible à Toulouse sous forme d'un gros volume 
relié (P8 Microcode HP 200F + 20F de port) 

Cependant je ne recommande sa lecture qu'à 
ceux qui ont réellement l'intention d'écrire des pro- 
grammes en microcode, car les mnémoniques ne sont pas 
ceux du club (cf "Au Fond"). Il n'est pas question 
pour nous d'abandonner les mnémoniques du club pour 
ceux de HP, trop de travail a été fait avec et de plus 
les codes HP ne concernent que ceux des mémoires in- 
ternes, et non pas celles des périphériques que nous 
n'aurons certainenent pas de HP alors que nous avons 
notre propre listage de ces modules. 

Pour un bon usage du listage HP je viens 
de faire ce résumé (ci-dessous). J'ai renoncé ä une li- 
ste de tous les points d'entrée (plusieurs milliers) 
et je n'ai pas plus trouvé de classement alphabétique 
logique. La liste n'est pas bien longue, vous aurez 
vite fait de la parcourir. 

Pour La pl u part de ces programmes HP don- 
ne les conditions d'entrée, de sortie, et un commentai- 
re ligne par ligne. Passionnant! le n° de page est 
celui du document. 


P2 rappel de registre, départ de toutes les 
fonctions 

p3ä6 Utilitaires divers 

p8 départ d'un programme , octet suivant 

pi0 exécute, 

pil SST et BST, éveil de sommeil léger 

pl2 pause, éveil de sommeil profond 

piä test pour master clear, test mémoire 

plié départ à froid 

pi8 incrément du pointeur, validation du 2° 
octet 

pli9 Rang 10, Allok(?) ajouté en 81 pour STOFLAG 
dans advanced programming ROM 

p20 BCDBIN 

22 lecture label alpha connaissant la fonction 

24 View et Aview, mise à jour des flags 

25 Prompt 

26 élement du catalogue 

27 corrections de bugs(bug 3,8) 

37 entrée d'argument 

40 entrée des chiffres 

41 affichage chaines de caractéres 

43 affichage du END-affichage d'un pas de 
programme 

45 placer REG à l'écran 
MEMLFT, nombre de registres restant 

+6 envoi d'un caractére à l'affichage-affichage 
nom fonction en microcode 

47 NNN vers décimal 

49 formattage d'un nombre sous forme de chaine 
alpha 

50 trouve le début d'un programme en rom/RAM 

SL n° de touche pour assignement 

52 change label local alpha en numérique 

53 exécution d'une fonction assignée 

53 supprime le shift 

56 mise en forme des flags 

57 partie du catalogue- affichage du programme 
en SST 

58 CLD - début d'entrée en alpha 

59 note le code de La fonction dans REG 10- 
message, validation de l'affichage a 8 

67 adresse des XROM 

68 entrée des chiffres (forma: du registre Q) 
à la mainü 

70 entrée des chiffres dans un programme 

72 overflow 
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16" 


20" 


21 
161 
167 


170 
175 
188 


191 


197 
206 
208 
217 
222 
223 
224 
226 
227 
228 
229 
230 
231 
232 
233 
234 


236 
237 
239 
249 
251 
252 
253 
263 


264 
265 
266 
267 
268 
270 
279 
282 
283 
284 
285 
286 
287 
288 
289 
290 
292 
2 92 
293 


annonciateur prgm ON,mise en forme entrée 
chiffres 

+ pendant entrée chiffres 

+ pendant entrée alpha 

arrondi 

formattage d'un nombre pour affichage 


affichage du contenu de C (nombre ou alpha) 
catalogue 2 

fin de l'arithmétique en registre 
effacement pile retour user 

entrée de touches 

test programmable ou non 

interruption séquence partielle 

touches A-J pour valeurs numériques 1-10 
affichage d'une ligne de programme 
relocatables 

SIGN 

table du clavier 

point d'entrée des fonctions et noms 

mo de 

cat 3 

table principale des fonctions 

test des index de touches (assignements) 
fin de la table principale des fonctions 
RDN - mise de C à 333333 - fonctions par 
défaut des touches (plan du clavier) 

ISG et DSE 

comparaisons 

conditions des flags 

sigma reg - contrôle d'existence des regi- 
stres 

état de l'affichage 

BEEP-TONE 

°,rd,grades 

ASHF, ASTO, trouver le premier non nul en 
alpha 


Size (avec bloc move!) 


Math 

Math scratch routines - certains nombres 
sont calculés avec une mantisse de 13 di- 
gits 


H---HMS et retour 
constantes du Cordic 
table des messages-correction du Bug 1 (sig- 
ma) 
messages-appel de messages à partir d'un 
ROM externe (du type noms de routines) 
calculs de sigma + 
DEC et OCT 
inversion du flag shift 
Pack 
dans pack, test pour I/0 buffer 
déplacement de registre 
Copy 
correction d'erreurs (bugs) 
table de chainage de labels et prise d'octet 
chainage 
BST-SST 
CLP 
DEL 
routines d'erreur 
Del ligne 
placer un octet en RAM, charger le pointeur 
programme 
génération de chaine de labels 
insertion de ligne- relocation 
Gosub rapide dans ROM à adresses fixes 
recherche d'un label numérique 
XEQ/GTO alpha et indirects 
XROM 
XEQ 
recherche d'une chaîne alpha ffonction ou 
label) 
RTN 
XEND exécute END 
logique du rang 12 
saut d'un label : déplacement du canard 
ASN 
examen des ROM externes pour service 
table de branchement RAM 
trouver un registre disponible 
BST 
lever les flags PACK dans un END 
création de l'adresse PC MM 
équivallent de GTO ligne 
prend un octet en ROM ou en RAM 
incrémentation de l'adresse(et décrément) 
insertion d'un octet 
de d'une ligne 
" d'une chaïne 


% d'une ligne 


n° de ligne 


295 changement de ligne en RAM 


298 assignation d'une fonction a/c du code 
300 justifie l'affichage à gauche 

309 table des caractéres spéciaux 

310 affichage de alpha 

31 L envoi d'un caractére à l'affichage 

3:12 conversion ASCII---LCD 

313 exécution de Fn 

314 scroll - effacement LCD 

J'ES octet suivant RAM ou ROM - Append 

316 entrée de données (chiffres puis alpha) 
321 prompt ? 

323 dé compile 

32:6 affichage XROM 

327 teste les index des touches 

330 exécute fonctions en ROM 

331 affiche un label 


Remarquez que toutes les descriptions du document 

HP sont classées par blocs de 4 pages appel6é"QUAD" 

et référencés en octal à l'intérieur d'un bloc ce qui 
ne facilite pas le travail!!!! 


6 À K + K * *k + 


Organisation, dans un ROM, des programmes en langage 
utilisateur: 


Premier mot: nombre de registres nécessaires 
pour copier (COPY) , arrondi au dessus s'il y a un 
reste: 9 registres + 2 octets = 10 registres. 

Deuxiéme mot: 

digit (244) de gauche à 2= pas privé, à 1 

privé 

digit du milieu = reste d'octets, ici 2 

digit de droite =ÿ 

Troisiéme mot ‘premier octet du programme. 

en fin de programme, le dernier octet du 
END est égal à 22F (peut être 12F si privé?) 

La distance label ---END (chainage) est 
codée comme en RAM, sans doute pour assurer le SST et 
BST entre END et label. (cf AF III.3.c) 

Les sauts des GTO à 2 octets sont codés di- 
rectement en octets sur 7 bits (le 8° donnant la direc- 
tion), donc avec un maxi de 127, plus loïn qu'en RAM 
et, si La COPY n'est pas requise, on peut supprimer 
les labels numériques, La compilation étant défini- 
tive (gain d'octets et de vitesse). 

Calcul de La distance: adresse du dernier 
octet inclu - adresse du premier octet inclu + 1 

J'ai ainsi placé en TR-1C le programme 
BHEX (venu d'Australie!) et qui sert ä trouver la 
valeur du code 2716 connaissant le code 244 : donner 
l'adresse , puis au prompt entrer à partir de l'adresse 
demandée la valeur du code 2 
(par exemple pour B530, entrer 1, ENTER,0, ENTER,0O, 
ENTER,O, R/S. L'imprimante est indispensable ainsi 
que TR-1C. Si vous avez TR-1B ou A, et que le programme 
est en RAM, n'oubliez pas de rajouter LBL 00 aprés 20 
STO 00 ! en ROM il n'était pas nécessaire. 


Ajoutons qu il faut marquer le début de 
chaque instruction (premier octet d'une instruction 
à plusieurs octets ou octet unique en plaçant un 1 
dans le digit de gauche. 

Ci-dessous le listage par PRP et le désas- 
semblage, comparez (bon exercice ») 


A1eLBL “EHEX" 2% "+ 51 4 

g2 FIX 8 27 ST0 52 BCDBIN 
93 CF 29 28 PROMPT J3 X+Ÿ 

84 ADY 29 CLA 54 STO 88 
5 “BITS 2bäd” 38 ARCL T 55 RDN 
86 “+ CODE” 31 “+: 56 SXL 

87 PRA 32 ARCL Z 57 $kL 

88 AV 33 ++: 58 RXR 

49 ADD?" 34 AREL Ÿ 59 DECODE 
18 AN 35 “he 68 CLX 

11 PROMPT 36 ARCL X 61 STO 
12 PRA 37 ++ "+ 
13 AOFF 38 ACA 63 STO \ 
14 CODE 39 ST+ X 64 ACA 

15 SKL 48 ST+ X 63 RDX 

16 SKL 4i + 66 BCDBIN 
17 RER 42 ST+ X 67 DECODE 
18 5XL 43 ST+ X 68 CLK 

19 SXL 44 + 69 ST à 
28 STO 48 45 ST+ X 78 “+ . 
21 CLX 46 ST+ X 71 T0 à 
22 NRCL 47 + 72 ACA 

23 DECODE 48 EXTERT 73 PRBUF 
24 ELX 49 CLX 74 GTO 88 
25 STD * 5@ NRCL 73 END 
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BS3E 41-662 


BSSA 644-118 


2587 1F2-7C2 


8584 113-683 


ESF 218-448 6558 444-118 8598 47F-1F3 8505 84C-830 
ES3A 100-700 BS9C 43F-6F3 6599 43f-GE2 SRE 103-683 
531 408-408 853D 180-638 B56A 198-663 8587 449-421 
8532 4F3-3D1 B9SE 18E-632 0588 472-102 8588 113-693 
2533 GAG-488 BSSF 1AF-693 RSC 1F2-7C2 BSB9 818-844 
2534 442-192 B560 448-128 Sen 47F-1F3 ESA 177-503 


8535 48-128 
8536 449-iti 
2537 499-168 


361 188-623 
656€ 143-683 
563 4ÿF-633 


B5SE 43A-8EZ 
B958F 198-663 
B594 473-103 


B5BB 191-641 
B5BC 876-112 
B5BD 1F4-7D4 


8538 190-678 B964 183-683 591 {F4-704 BSBE 47F-1F3 
8539 486-688 8965 4AC-434 592 47F-1F3 ESRF 028-889 
BS3R 199-641 8566 113-693 2593 424-484 BSCA 829-888 
BS3B 41D-471 8567 HC-438 594 428-488 pSC1 828-828 
B53C 18F-633 8568 143-693 8595 428-454 BC? 191-641 
853D 1FE-7F2 8569 949-421 8596 1A7-693 BSC3 876-102 
BS3E 442-182 BS6A 1A3-683 2597 h4i-181 ESC4 117-693 
853F 649-121 BS6B 460-434 598 192-642 SCS 841-101 
BS4A 454-158 B56C 143-683 . 8599 473-103 BSC6 175-5Di 
541 453-143 S6D 44C-438 859A 192-642 BSC7 113-683 
2542 28-068 B56E 138-408 859 473-103 BSCE 047-813 
ES4Z, 424-080 BS6F 177-504 B59C 144-588 SCO 13-683 
2544 828-089 E578 143-683 8S9D 192-642 BSCA 419-848 
8545 428-888 8571 AUE-852 59€ 473-103 BSCB 177-503 
8546 420-498 8572 13-683 299F 192-642 BSCC 191-641 
2547 426-488 B573 A1B-44ÿ BSAQ 473-103 BSCD 476-112 
B548 432-802 8574 177-503 BSAL 148-586 BSCE 1F6-7D2 
549 462-192 BS7S 191-641 SA? 192-642 RSCF 97F-1F3 
BS4A 441-181 8576 476-112 ESA3 473-103 BSIG 028-999 
B54B 64-198 8577 1F4-708 BSA4 192-642 BSD1 628-089 
BS4C 1F8-7E8 8378 87F-1F3 BSAS 473-103 BSD? 420-888 
BS4D 47F-1F3 E579 424-084 BSA6 14-588 BSD3 429-689 
GS4E 928-088 B57A 428-888 SAT 183-683 ESI4 429-888 
254F 024-008 6578 428-664 BSAS 177-503 8905 191-641 
550 628-438 857 191-641 BSAS 13-683 516 476-102 
551 643-193 8571 476-102 BSAA AGE-632 517 117-693 
552 G4F-133 ES7E 18E-632 BSAR 114-454 SDS 441-161 
2553 444-119 S7F 187-613 SAC 113-687 85D9 117-693 
2554 645-111 8590 198-663 BSAD 887-813 SIA d4f-122 
2555 197-693 8381 474-108 BSAE 13-683 g5DB 181-601 
8556 443-129 8582 1F2-7C2 . B5AF 08B-423 ESDC G6E-1B2 
8557 18F-633 | 8583 87F-1F3 B5BQ 130-408 ESDD 1CA-722 
8558 1F4-714 8584 434-8E2 581 175-511 BSDE 818-468 
559 441-181 2585 198-663 BSE2 113-683 QSDF 22F-883 
8586 471-101 2563 00C-836 


#  % # * # * * 


Tous ceux qui veulent écrire des routines en microcode 
peuvent le faire, même si ils ne disposent pas d'un 
lecteur. Je peux (sans garantie de délai) essayer 
leurs programmes. Mais cet essai est laborieux, et 
demande beaucoup de travail. Je vous demanderai donc 
de faire des programmes cours, d'intéret général, des- 
tinés à être insérés dans TR (Toulrom) ces programmes 
doivent être testés à la main avec le plus grand soin, 
soigneusement recopiés, codés et présentés avec une 
description du fonctionnement lignepar ligne sur des 
formulaires spéciaux dont je peux vous envoyer un mo-— 
déle sur demande. 

Je peux également vous préparer un ROM 
personnel, mais dans ce cas ce ne sera pas gratuit com- 
me pour le club. Prix en fonction du travail à faire, 
si vous me fournissez un code complet qu'il faut ju- 
ste taper, quelques centaines de francs, sinon tout 
dépend du boulot! 


MEMLOST 


Le programme ci-joint fait maintenant par- 
tie de Toulrom 1C (TR-1C). Il n'a pas de nom réel. Il 
a pour but de modifier dans un sens plus agréable 
l'état de la machine aprés un mémory lost. 

Si vous faites un Mémory Lost (voulu ou non) 
avec TR-1C branché vous verrez apparaitre MEMORY LOST 
puis #SIZE G26x:à ce moment la machine aura le flag 
28 baissé (virgule décimale) sera en FIX 2 et en SIZE 
026, comme indiqué. J'ai choïsi cette SIZE car elle 
permet sans modification l'utilisation de programmes 
de La HP 67. 

Ceci est vrai quel que soit le nombre de 
modules placés en machine, c'est donc la place restant 
pour les programmes qui varie. 

Ce programme utilise le fait que la HP, 

à chaque MEMORY LOST va voir s'il y a quelque chose 

à effacer dans les modules en lisant l'adresse FFA 
(“AU FOND", VII.l1). Je place donc à cette adresse 

de TR-1C une instruction JNC -A qui renvoie un peu 
plus haut à la ligne Writ 3(x) qui sauve le contenu 
de C dans le registre x de la pile puis j'envoie la 
#1C un peu en arrière (pour avoir la place de travail- 
ler. ?NC XQ OFDA a en effet comme propriété de ren- 
voyer Le pointeur dans le même K octet à une position 
dépendant du mot suivant. Ici ce mot est 281, nous 
sommes dans le dernier K octet du module, donc CO00 


PPC-T NH x + 281= F81, début du programme. En tapant ce texte je 


viens de trouver une erreur vicieuse! j'avais écrit 

le programme avec 281 au lieu de 381. J'envoyais donc 
le pointeur beaucoup trop haut, maïs comme il n'y a 
rien dans cette zone il exécutait des NOP jusqu'a ren- 
contrer mon programme (ce qui d'ailleurs allongeait 
fortement l'opération). Mais si un jour nous étions 
venus à placer des programmes dans cette zone nous 
aurions peut être mis du temps avant de comprendre 
pourquoi MEMLOST ne marchait plus ! Que cet exemple 


vous persuade de la nécessité de commenter ses program- 
mes à l'intention des autres, rien de tel pour les con- 
trôler. 

Bref, nous voilà en F81. Il n'y a plus 
qu'ä lire les flags, comme ils sont à l'état "MEMORY 
LOST" il suffit d'y charger une constante pour les 
modifier, 4 dans le digit 6 pour La virgule, 2 dans 
le digit # pour FIX 2 et il n'y a plus qu'a réécrire 
le registre d. 

Aprés avoir effacé le MEMORY LOST qui se 
trouve dans l'affichage (avec ?NC XQ 2CF0) utilisons 
la routine d'envoi de message O7EF. Comme vous le 
voyez, il suffit de faire suivre l'appel à cette rou- 
tine des caractéres souhaités. Elle s'arréte quand el- 
le trouve un 2 à gauche du code du caractére. Il n'y 
a plus qu'à faire ce qui était promis, placer le nom- 
bre de registres nécessaires en C S&X (01A=026 décimal) 
et exécuter le programme SIZE. 

Il faut encore continuer la routine qui 
fait le tour des ROM et que nous avions interrompue. 

Pour cela nous récupérons le contenu ini- 
tial de C que nous avions rangé dans x, effacons x 
(n'oubliez pas, nous sommes en MEMORY LOST!) et re- 
prendre à la suite du "polling", en 27F3. 


Ce n'est pas si difficile, aprés tout. Mais 
ce petit programme m'a quand même pris environ 6 heures 
de travail et environ 10 brulage / effacement d'EPROM. 

Un protocoder (ou MLDL, labo de langage ma- 
chine en mémoire vive) me manque cruellement, mais 
j'attendrai qu'il en soit fabriqué un en France pour 
l'acheter (j'espére bien avoir le premier aprés celui 
du constructeur!) 


BFS81 2BG-EEG RERD 14(d) 


BF8e 150-578 R= 6 NO ON + # + + 
BF83 118-448 LDBR- 4 
BFS4 450-174 R= 4 ÿ 


BF25 498-249 LIBR- 2 
BF86 3A8-ENA HRIT 14(di 


gFe7 2CI-F4I ; 
BFee 4BB-2CA ?HC KB 2CFA 

BF29 2BD-EFI ” 
BFSA 81C-478 2NC KO A7EF s 


BFSB AEA-BAZ 4ë + 
BF3C 413-843 19 5 
BFSD 449-821 91 
BFSE 61h-862 86 2 

SE 


B61C BF-2F3 191 7? 
* B61) 912-442 I8R 
B6LE 285-A11 
B61F 414-856 ?HC x ASA! 


BF8F 865-011 # 

È 8628 2DC-B78 R= 13 
BF99 920-488 32 8621 4D8-348 LDER- 3 
eF91 898-0c8 488 2 8622 BAE-282 AOC ALL 
BFse @2-42 “bé 8623 136-408 LOI SEX 
NRUR  H$ 8624 818-448 16 P 
EF94 22A-BR2 554 + " 8625 276-9C8 RAM SLCT 
BF96 BIA-B62 262 ” 8627 414-258 NC X0 ASER 
BF97 25D-971 8628 d4E-132 C=8 ALL 
BF99 GFS-ZE8 READ 3CX) don M0 Se 9 
BF9B M4E-132 C=Q ALL B62C 138-4C8 LOI SEX 
BF9C AES-3A8 MRIT 3CX) * BED 881-481 18 
BF9D BEE-382 COB ALL B62E 250-078 R= 12 
BP SCD-F2I " B62F 342-062 A+ 8 
BF9F 49E-272 NC GO 27F7 

- 8638 027-493 JC ++44 

8631 3FA-FE2 LSHFA M 

BFFB BES-3A8 HRIT 3CX) x 8632 266-992 C=C-1 SEX 
BFFL 369-DA1 8633 3E3-F83 JNC +-44 
BFF2 43C-GFB NC KO GFIA 8634 226-892 C=C#I SEX 
BFF3 361-E81 * 8635 480-488 HOP 
BFF4 A8G-A08 B636 GBA-2E2 AOC HN 
BFFS A88-A48 * 8637 3C1-FBI 
BFFS 6AA-G48 8638 452-142 NC CO 14FA 
BFF7 608-à88 * 8639 GAG-486 HOP 
BFFS 098-488 B6ZA 088-488 HOP 
BFF9 406-408 * 863B A84-GA8 NOP 
BFFA 3B3-EC3 JNC *-8f 
BFFE 403-047 30 « 
BFFC @31-AC1 491 
BFFD 612-442 15 R “ 
BFFE 414-858 AT 
BFFF JFF-FF3 1023 ä 
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R?: Le dernier programme en microcode pour ce nu- 
méro . Je viens juste de la terminer aprés une nouvel- 
le séance marathon de brûülage/effacement d'EPROM . 

Heureusement grâce à Noël et à mon épouse 
j'ai pû compléter mon installation par une petite té- 
lé portable qui me permet de travailler tranquil- 
lement dans mon bureau même quand l'autre télé est 
occupée à des usages plus habituels pour elle. 

Je dois vous avouer que je suis assez con- 
tent de moi car j'ai réussi à utiliser deux nouvelles 
routines internes, MEMLFT et GENNUM, de plus il y a 
dans ce programme quelques astuces pas mal. 

Bien sur il est encore possible que mon 
programme fasse des dégats dans une configuration que 
je ne connais pas, aussi prudence! 


R? a pour but de mettre en x le nombre de 
registres disponibles entre le .END. et le premier 
buffer du côté des assignements. Ces registres sont 
alors utilisables par SIZE (ou PSIZE), en rajoutant 
des programmes, en faisant des assignations... 

Manuellement il est facile de connaitre 
ce résultat, il suffit de faire RIN ou GTO.000 et de 
passer en mode programme pour voir à coté de OO REG 
le nombre cherché. Mais pour l'utiliser dans un pro- 
gramme, c'est une autre affaire. 

Dans le PPC ROM, un programme, F? rempli 
cette fonction. Mais le club n'avait pas prévu (com- 
ment l'aurait-il pu?) les nouvaux accessoires et en 
particulier le Timer. F? fait du dégat en perturbant 
les alarmes, ce qui le rend inutilisable. Ceci est 
d'autant plus génant qu'il est appelé par d'autres 
programmes. Hélas ceci ne peut plus être corrigé. Mais 
pour l'avenir R? fera le travail. 

R? appelle d'abord MEMLFT, programme appelé 
ainsi dans les listages HP et chargé de compter ces 
registres libres. 

MEMLEFT ne demande rien en entrée et rend 
le nombre de registres en hexadécimal en C (2:0)(SexX) 
mais de plus MEMLFT laisse la RAM sélectionnée au der- 
nier registre testé. 

Les pas suivants préparent le travail de 
GENNUM. GENNUM est un programme trés élaboré qui a 
comme travail de transformer les nombres hexadécimaux 
internes (NNN) en décimaux et de les afficher. Il 
demande en A (13) le nombre de chiffres à traduire 
ou @ auquel cas il traduit tous les chiffres présents. 

Il y a peut-être une astuce pour utiliser 
ici cette dernière possibilité, mais je ne l'ai pas 
trouvée, en effet GENNUM envoie les chiffres à 1'af- 
fichage en format FIX O, sans décimale. Ce format 
est médiocrement apprécié par le registre x, au moins 
du point de vue présentation, j'y reviendrai. 

De plus GENNUM est prévu pour envoyer ses 
messages à l'affichage et il n'est pas possible de 
court-circuiter la partie en question de ce programme. 

GENNUM utilise WRIT 15(e). Moi, je ne te- 
nais pas tellement à envoyer un message ä l'affichage 
il a donc fallu que le WRIT 15(e} soit rendu inoffen- 


= 


sif en sélectionnant le "chip 1", c'est à dire les 


mémoires situées immédiatement au dessus des registres 
d'état. A PROPOS, CETTE FACON DE FAIRE, CONSEILLEE PAR 
HP MONTRE QU'ON NE PEUT UTILISER AUCUN DES REGISTRES 
DE 010 à O1F qui doivent rester vides. 

MEMLFT arréte sa recherche des registres 
disponibles dés qu'il rencontre un registre non vide, 
sans vérifier si ce registre contient des résidus ou 
des données valides. Dans une première version de R? 
je n'avais pas détourné GENNUM de ses mauvaises ha- 

itudes d'écriture et le WRIT 15(e) écrivait au des- 
sus des buffers! du coup aprés chaque utilisation de 
MEMLFT il y avait moins de registres disponibles ! 

Donc pour ce qui nous intéresse, c'est à 
dire un nombre de registres, pas plus de 3 chiffres 
(maxi 319, maxi acceptable 999, ça doit être assez 
même pour les truqueurs), donc 3 dans A(MS). 

GENNUM demande également que le chiffre à 
traduire soit dans A(S&X) . 

Puis sélection du chip Ll pour que GENNUM 
puisse faire ses besoins tranquille (oh!). 

Enfin exécution de GENNUM (05E8) qui rend 
le nombre en AM), justifié à gauche, et Le nombre de 
digits en B(MS) (non utilisé ici). 

Resélection du chip O (registres d'état) 
en prévision de l'écriture dans x, en même temps celà 
nettoie le registre C, nettoyage de A à droite du 
nombre (celuici se trouve dans A(12:11:10), puis 
formattage au format standard (SCI 10), ce qui n'est 
pas si facile. Il y a sûrement une routine interne 
qui fait ça, mais je ne sais pas où elle est. 

donc je commence avec un exposant de 1, 
c'est à dire L de moins que mon maximum qui est 2 
(319 = 3,19 E2) 

mise en place du pointeur au premier digit. 
Si ce digit n'est pas nul, il y a trois chiffres, 
sauter à la fin, sinon ce zéro est génant (zéro non 
significatif à gauche du nombre) il faut le supprimer, 


d'où le LSHFA qui pousse le nombre d'un digit à gauche, 
et le C=C-1 S&X qui corrige l'exposant , et on remonte 
au test pour voir s'il y a bien 2 digits. Si on a au- 
tre chose que ®, il y a bien 2 digits et on va à la 
fin. Sinon il faut supprimer ce Ÿ génant et nouveau 
LSHFA et C=C-1l S&X. Mais là il faut savoir s'arréter, 
si il ne reste qu'un digit, peu importe qu'il soit 

ou non nul. Mais en C S&X , au début, il y avait 1, 
aprés la première soustraction il y avait ®, maïnte- 
nant il y a FFF et CARRY est levé, donc nous sautons 

à La ligne B634 , 1à même ou nous serions arrivé si 

il y avait eu 2 ou 3 chiffres. Il faut maintenant re- 
mettre au niveau l'exposant en rajoutant le 1 qui 
manquait. Mais attention! dans le dernier cas de fi- 
gure il y a FFF en C S&X, et CARRY est armé, d'où le 
NOP qui évite le court-circuit de l'instruction sui- 
vante en cas de saut. 

Il n'y a plus qu'a ramener en C le nombre 
et à finir en 14F@: à partir de cette adresse, la pi- 
le va étre montée pour faire de la place pour le nou- 
veau résultat, Last x n'est pas modifié. 


OUF je ne suis pas sur que vous ayez suivi, 
mais je ne sais pas comment expliquer davantage, tant 
pis! 


*X *X + *+x + 
Mettre au point un programme en Microcode! 


1) Nous n'avons pas de mode trace, mais 
nous pouvons démarer le programme Là où nous le vou- 
lons en utilisant le petit programme ci-dessous écrit 
par Janick Taillandier. 

Etant donnée une adresse sous forme hexa- 
décimale en alpha, ce programme se branche à l'adresse 
indiquée et poursuit l'exécution. On ne peut pas 
passer d'argument sauf en même temps que l'adresse. 

GTOROM copie x en C et exécute GTO ADR. 

À condition de tenir compte des 3 rotations 
d'un digit à gauche (RXL) on peut donc placer des con- 
stantes en C, en les mettant à coté de l'adresse au 
moment de la demande'"ADR?",. 

En commençant par adresser les codes de 
fin du programme en microcode à tester, on peut se 
rendre compte de son fonctionnement. Ici le RESET nou- 
veau genre (+ ON) est bien utile! 

Par exemple j'ai pu ainsi vérifier le corps 
du programme MEMLOST (ailleurs dans ce numéro) en me 
branchant sur BF9B pour vérifier l'effacement de x, 
puis sur BF89 où on constate qu'aucun message n'est 
affiché (l'affichage n'a pas été sélectionné) puis 
en se branchant en BF87 on a le bon résultat, etc... 

On remonte ainsi jusqu'a ce que le mauvais 
fonctionnement apparaisse. 


2) placez quelque part dans le programme 
(vers la fin) (le TRIC doit se trouver à l'adresse B) 

2D9 ?NC GO ) 

2CE 8B3B6 code de la 2716 "OA" si 

000 NOP ) début à une adresse multiple 

000 NOP ) de 4 (0,4,8 ou C) 


vous recommencez alors le processus N°1 
en utilisant SST aprés l'entrée de l'adresse. Vous 
exécutez aînsi "DIS" qui, en mode SST, place dans l'af- 
fichage le contenu de C décodé. Gros avantage, si 
l'imprimante est branchée et allumée, ce contenu est 
imprimé, ce qui est trés important à cause du fort 
risque de MEMORY LOST ou de plantage, l'impression 


ayant lieu avant! | 
J'ai pu ainsi m'appercevoir qu'il fallait 


sauver C dans un registre (x était disponible, je L'EaT 

pris, mais on peut utiliser Q...) et qu'il fallait 

le faire dés le début car ?NC KQ OFDA détruit C. 
j'aurai pu utiliser un JNC (ligne FFA) 

jusqu'a F81, mais la disposition ac rt uelle permet de 

placer le programme principal n'importe où avec un 

minimum de changements. 


gleLEL “GR” 
g2 “ADR?" 
83 AUN 

44 STOP 


35 QUFF 
#e 86 CODE 

87 RRL 

88 RRL 

99 RYL 

18 GTOROH 

(1 END. 


*%X _* 


* 


Saite HP-45 (pt?) 


du type AF,. Peut-être y a-t-il une perle perdue au 
milieu de cet océan, mais il est énorme! 

Revenons à l'organisation de la mémoire. 

La partie située avant la matrice est en 
fait en ligne O de celle-ci. Pour y accéder, un moyen 
mettre dans R@ un nombre du type O,xxxxx (nombre he- 
xadécimal avec un exposant nul: c'est assez facile: 
il suffit de recueillir un registre de codes program- 
mes fait pour la circonstance. 

Ceci dit, cette partie est assez peu inte- 
ressante. J'y ai appris comment était organisé les 
registres de "Solve": ler approx., 2°approx, résultat 
de la lére, résultat de la seconde, un registre pour 
créer une nouvelle approximation. Par contre les 23 
registres de l'intégration me sont encore mystérieux. 

Du coté de la zone intéressante il y a en 
plus de ceux déja cités: 

(5) Last affichage la mantisse du nombre dans ce re- 
gistre est le dernier affichage: peu d'interet, toujour 
du type E 1,26 

en 21 la source du registre Random, et dans l'exposant 
le numéro de ligne courant, puis, mais je ne suis plus 
trés sûr 

en 22: les adresses des début de matrice 

en 23 le nombre d'octets du programme et les adresses 
de retour de sous programme 

en 24 du coté de l'exposant, pevt-être l'adresse de 
l'octet où se trouve le pointeur. 

en 10 et 11: les registres de commdde de l'affichage: 
à chaque segment correspond un bit de ce registre. Je 
suis a peu prés arrivé au décodage, mais j'ai des pro- 
blémes avec une normalisation du demi-octet de signe 
de l'exposant: je me contenterai de donner la recette 
pour faire afficher à la machine son nom HP 15C: 

créer le code 00 1E 08 BD DC 00 80 par le programme 
x&0 ;LBL O;PSE;%;LBL 8;GTO E;LBL O 

le mettre en mémoire 

de même pour le code 0...34 00 80 par le programme 
x#0; LBL O0; RCL 2;LBL O0... 

puis faire un programme qui mette le code 1 dans le 
registre 10, le code 2 en 11, puis qui boucle indéfi- 
niement(si il s'arrête on voit le registre x à l'af- 
fichage). La machine affiche en clignottant HP 15C. 

Volä a peu prés tout ce que je sais: si 
celà intéresse des gens, je pourrai peut-être envoyer 
dans quelques temps des résultats plus précis et com- 
plets. En attendant, je suis preneur de tout tuyau. 

1 question: peut-on espérer qu'un jour des 
bricoleurs Hard nous permettorns des périphériques? 
ça fait envie... 

Amicalement 

Piguet Bruno (T152) 


Un grand bravo pour votre travail qui est 
formidable. Bien sûr 11 faut continuer. Beaucoup de 
trous parmt les instructions à L octet ont un sens 
évtdent, reste à trouver les autres. Reste ausst À 
écrire des programmes mettant tout cela en applteation. 

Une remarque, quand même: je ne pourrait plus 
à l'aventr (cf éditorial) taper mot-même les arti- 
cles. Du moins je vous demanderat de faire les shémas 
et dessins sur une feuille à part et propres pour que 
Je putsse les publier telquels, et st possible de ta- 
per, mats au moins d'éctire trés listblement le texte; 

Je sats que c'est du travail supplémentat- 
re, mats j'at vraiment eu beaucoup de mal à déchiffrer 
La lettre (j'éspére que je n'ait pas fait trop de fau- 
tes). 

Ecrivez également vos articles pour qu'ils 
sotent listbles même par ceux qui ne possédent pas La 
machine. Aîinst vous serez sür d'être compris par ceux 
qui l'ont. Bien sûr je n'ait pas cette machine, mats 
J'ai une certaine expértence et je dois avouer que 
j'at tapé beaucoup de passages "dans Le noir'"sans les 
comprendre. 

Que cela ne vous arréte pas en st bon che- 


*+* % 


DIVERS 


min. 





PPC ORGANISE UN CONCOURS D'ADHESIONS. SI VOUS ADHEREZ 

A PPC USA, PRECISEZ QUE VOUS VENEZ DE MA PART (JD DODIN) 
il y a des prix importants à gangner et j'espére que 

Les éditeurs de journaux n'en sont pas exclus, je pense 
avotr provoqué beaucoup d'adhésions! Bien sur, le prix 
s'il y en a un revtendra au club. Pensez-Y, il y a un 
HP 75 comme premter prix ii!! 


* *% 
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* REeacrions 


Cher Jean-Daniel 

Je vous remercie de m'avoir aussi prompte- 
ment envoyé VIN4 PPC-T qui est trés intéressant aussi 
je vous commande les 3 premiers numéros ainsi que Tips 
and Routines + HP System Dictionnary et Microcode 1 
(ci-joint enveloppes affranchies). Je vais enfin pou- 
voir me repencher sur ma HP 41 - je finis mon S.N. 


Dans VIN4, page 7, j'ai relevé un passage 
qui m'a surpris, celui concernant le numéro des machi- 
nes, en effet la mienne comporte le numéro 21 16 510 
501, donc qui serai sortie la 16° semaine de 1981 soit 
courant Avril, or je l'ai achetée le 18 Mars 1981... 
voir photocopie du bon d'achat. 

Bien cordialement 

T42 Michel Charvier 


Vértfication faite, il semble bien que Le 
code HP sott systématiquement en avance sur La date 
de vente. Je ne connats pas l'explication. 


EE 


Cher Mr Dodin 

Ca y est, je termine à l'instant la lecture 
des différents numéros du journal PPC-T. 

En effet le travail fait en Australie est 
formidable, mais à Toulouse également. Pour s'en con- 
vaincre il suffit de voir la progression de volume et 
de contenu du journal. Le N°1 fait 5 fois plus de pa- 
ges que le VINI, et quand au contenu, il n'est pas de 
trop de deux mois pour le digérer. Donc en un mot , 
BRAVO. 

Dans votre lettre à Richard, VIN4, vous 
faites une analyse trés pertinente du phénomême HP-41 
PPC. C'est tout à fait vrai que "HP 4l est un magnifi- 
que jouet", que ‘nous aimons tous programmer et non 
utiliser les programmes", qu'il y a trés (trop) peu 
de programmes professionnels. Ce dernier point s'ex- 
plique peut-être par le fait qu'un programme profes- 
sionnel doit être concu dans un but pratique et non 
comme un exercice de style, ce vers quoi tend tout 
mordu de HP4l. 

Plus loiîn vous classez les utilisateurs 
dans 4 types differents, je dirais plutôt quatre ni- 
veaux successifs. Certes, le fossé est énorme entre 
le nouveau venu et l'expert en assembleur, mais il 
n'y a pas, à mon avis, de cassure mais plutôt une pro- 
gression continue et les frontières entre les diffé- 
rents niveaux ne sont pas nettement définies. 

Cette progression sera suivie par la plupart 
d'entre nous, car nous sommes bien des amateurs dans 
le vrai sens du terme, pour qui les applications 
professionnelles ne sont pas le souci principal. Et 
un des principaux rôles de PPC est, et sera, de faci- 
liter à chacun l'accés au niveau supérieur, grâce, 
entre autre, au journal, où chacun pourra piocher ce 
qui correspond à son niveau, laissant le reste de côté 
pour plutard. 

Il est évident que le journal seul ne suf- 
fira pas à passer d'un niveau à un autre. Pour passer 
du stade de nouveau venu à celui d'utilisateur régu- 
lier, l'étude approfondie du manuel de l'utilisateur 
s'impose; pour le stade suivant c'est le livre de Wi- 
ckes qu'il faudra consulter, etc... 

Aussi je ne pense pas que la multiplication 
des journaux soit une solution, car aucun d'eux ne 
saurait ni ne devrait remplacer le manuel de l'utili- 


sateur, Tips and Routines, Synthétic programming, etc... 


Vous évoquez plus loin le probléme de la 
prolifération des périphériques, certes, rares seront 
ceux qui les posséderont tous, mais je ne pense pas 
me tromper en disant qu'il est possible d'accéder au 
niveau de l'assembleur sans en posséder ‘sinon aucun 
du moins trés peu. Aussi, je crois, qu'il faut voir 
ces périphériques d'un oeil critique, et les laisser 
à la place qui est la leur et pour laquelle ils ont 
été concus, c'est à dire des applications à orientation 
nettement professionnelle, (:lecteur de cassette, im- 
primante 80 colonnes, multimétre, entre autres...). 
Leur possession par l'amateur ne se justifie pas à mon 
sens par manque d'une réelle utilité d'une part, par 


leur prix non négligeable d'autre part. À ce propos, 
en effet, quand on fait les comptes on s'apperçoïit 
que ce que j'appelleraïi une solide configuration d'a- 
mateur, à savoir HP4lCV,lecteur de cartes,imprimante, 
X-fonctions, Time, revient déja à environ 8-9000 F. 
Si on ajoute à cela les accessoires cités 
plus haut, on arrive à un prix dépassant celui d'un 
ensemble tel Apple II 48K + Drive + Moniteur+ impri- 


mante, dont les possibilités sont d'un tout autre or- 
dre, 

Voilà pèle mêle, les réflexions suscitées 
par la lecture de PPC-T journal. 

Happy programming Marcel Trimborn (T86) 


* *% 


Cher Mr Dodin, 

Me voici maintenant aux USA pour au moins 
l an. C'est d'ailleurs la raison de ma lettre: pour- 
riez vous m'envoyer les futurs numéros de PPC-T aux 
Etats Unis. Il va de soit qu'il y aura un supplément 
à payer pour ma cotisation, faites moi savoir ce que 
celä coûte (FF et USA). Merci d'avance. 

Deuxiéme point de ma lettre: une question 
que je me pose sur ma machine: HP vend-t-il des ma- 
chines avec plus de mémoire vive qu'annoncé? Sur ma 
HP4lCV, aprés un Memory Lost, j'ai fait SIZE 319 et 
je suis passé en mode programme pour voir: 

00 REG 00 
apparamment normal et conforme aux spécifications. 

Ce qui me surprend c'est qu'il y a effecti- 
vement 4 octets de mémoire programme disponible dans 
cette configuration! d'où sortent-t-ils? Ayant fait 
ceci avec le lecteur de cartes, j'ai pensé que c'était 
peut-être lui le responsable. Raté: les octets sont 
toujours là sans lecteur. Si quelqu'un a une explica- 
tion sur ce maigre cadeau que nous fait HP? 

Heureuse programmation (en langage machine) 

Montarsolo T21 


En fait de cadeau...C'est plustôt raté.Il 
faut plutôt parler de vot! 

Chacun des modules de La HP fait 64 regis- 
tres. Il y a un module d'origine dans La 41C + 4 modu- 
Les possibles done 5 en tout (intégrés d'origine dans 
La CV) et 5 x 64 = 320 Nous devrions donc avoir 320 
registres et nous n'en avons que 319! 

En fait l'Operating System (en françats 
montteur) de la HP, sttué dans les modules intemes 
de mémoire morte, maintient en mémoire un END, Le 
.END., sttué toujours dans les 3 octets de droite du 
dernter registre uttltsé par la mémaire programme. 

St vous voulez, il y a toujours un program- 
me en mémotre, constitué au minimum du .EMND. 

320 registres - 3 oetets= 319 R+ 4 octets 
volà tout Le mystére. 


* _*% 


Une lettre de notre correspondant en Allemagne: 


Wolfgang BALTES (PPC 6746, CCD 156) 
GUARDINISTR. 143 
D8000 MUNCHEN 70 
Tel 089 7001540 


Cher jean-Daniel, 

Je t'envoie les documents promis. D'abord 
i1 y a les listings de 4 programmes que j'ai écrits 
en langage-machine: 

OUTB: Fait la même chose que OUTA, mais ne sup- 
prime pas les octets nuls inclus dans le 
texte 

produit une image des registres de La HP 
selon les adresses données dans le registre 
alpha 

Donnée une ‘adresse en binaire dans le regi- 
stre X, cette fonction cherche le mot ma- 
chine correspondant à cette adresse, elle 
accumule le texte suivant dans le registre 
alpha: 

AAAA____ MMM X DATA 

adresse, mot machine,lettre correspondante 
du code microcode affichage, le registre y 
contient l'adresse et le mot en binaire et 
l'adresse en x sera incrémentée. 

Fait la même chose que DATA, sauf que le 
mot machine n'est pas interprété comme 
DATA mais comme fonction. Le nom de 1a 
fonction est donné selon les listings 
PPC? Si La fonction comporte deux mots, 
elle sera imprimée sur deux lignes. 

DATA et MBEM fonctionnent sans HP-IL! quand USERflag 
21 est baissé, les deux fonctions ne mettent pas seule- 
ment le texte dans le registre alpha,mais l'affichent 
aussi à l'écran. Dans ce cas les fonctions à 2 mots 
sont mises sur une seule ligne (dans ce cas LDI ne 
marche pas trés bien). Quand le flag 21 est mis ces 
fonctions essayent d'imprimer le texte sur un péri- 
phérique IL. Le nom de MBEM vient de Mnemonies; mais 
puisqu'il y a déja une fonction MNEM dans le NFC-ROM 
j'ai changé le nom. 


DUMPRAM 


DATA 


MBEM 
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DATA et MBEM sront bientot réécrites, c'est pourquoi 
je ne t'envoie pas de listing documenté. 

DATA et MBEM ne dépendent pas de la page sur laquelle 
est branchée l'EPROM BOX. Au contraire DUMPRAM est 
fixé sur la page C puisqu'elle appelle ces sous fonc- 
tions directement (par ?NC XQ) . OUTB est totalement 
indépendant aussi bien de la page que de l'adresse 
dans cette page. 

Ensuite il y a des formulaires que j'utili- 
se pour écrireles programmes en LM. La première colon- 
ne est pour les adresses, la deuxiéme pour le code 
et la troisiéme pour le mnémonique. 


Suivent trois blocs pour les registres C, 

A et B de la CPU, respectivement. En lisant mes listings 
tu comprendras facilement comment les utiliser. Quand 
j'écris des programmes avec sous programmes, j'ai be- 
soin de noter quel espace de La CPU est utilisé par 
les différents modules des programmes? .C'est pour 
cela que j'ai fait faire des étiquettes autocollantes 
qui représententtous les registres de la CPU. Quand 
j'écris un sous programme, j'indique sur une telle 
étiquette .les registres utilisés et ainsi il est ex- 
trémement facile de vérifier si des données qui doi- 
vent étre préservées sont détruites ou non pendant 
l'exécution du sous programme. 

Ci-joint tu trouveras aussi la notice d'uti- 
lisation du NFC-ROM de Prototech. Le ROM lui-mêmeest 
sous copyright. 

Je pense qu'il est important de faire des 
exercices de lecture de programmes déja écrits, parce 
que cela donne des idées commenton peut écrire ces 
même fonctions d'une meilleure façon. 

Nous sommes plusieurs a faire de la program- 
mationen langage machine ici en Allemagne-c'est à 
dire: à vouloir en faire. Jusqu'a présent je suis le 
seul à avoir écrit des programmes, mais quelques amis 
et moi prévoient d'écrire un assembleur, c'est à dire 
un programme qui nous aidera à programmer en langage 
machine en permettant l'utilisation de Labels et des 
KQ --labels au lieu d'adresses, par exemple. 

Evidemment tu recevras dorénavant des copies 
de tout ce qui sera produit dans ce domaine en Allema- 
gne . 

I1 y a une autre bonne nouvelle: Il y a une 
nouvelle modification de l'imprimante pour suppri- 
mer l'interligne. Tandis que l'ancienne méthode ne 
consistait que dans le déplacement de l'interrupteur 
"home", ce qui résultait dans la perte de 6 carac- 
tères par ligne, la nouvelle méthode permet de :ar- 
der la largeur intégrale de 24 caractéres. Dés que 
j'aurai des détails je t'écrirais. 

J'ai commencé à écrire une série d'articles 
sur la HP-IL, comment elle fonctionne, son organisation 
et son concept. Au fur et ä mesure que les articles 
apparaiïitront dans le journal CCD jessaierai d'en faire 
une traduction pout toi. 

Evidemment tu es libre de publier tout ce 
que je t'écris ou de faïre imprimer les formulaires 
ou étiquettes. Il y aura des fois où l'information 
que je te donne sera réservée pour toi seul. Dans ces 
cas je le noterai dans mes lettres. Cela sera dû aux 
sources de l'information seulement, jamais à moi, 
car je pense que nous avons les clubs pour l'échange 
facile et gratuit et non comme clientéle guarantie 
aux fins commerciales comme c'est l'opinion de certains. 

C'est tout pour aujourd'hui. J'espére que 
tu pourras lire mon écriture et que mon francais n'a 
pas pris trop de rouille depuis que j'ai fini mes é- 
tudes à Montpellier. Si tu m'écris, n'attends pas de 
réponse immédiate! je viens juste de finir le travail 
pratique de ma thése (de 3°cycle) et je dois investir 
tout mon temps à écrire et à me préparer pour l'exa- 


men final (ici ce n'est pas seulement une présentation 
du travail fait comme à Montpellier). Mais quand cela 
sera terminé..e…s 

ä bientot 

Wolfgang 


Le NFC-ROM est Le jeux d'EPROM livré avec 
Le PROTOCODER. Comme tl est sous cqright; ilest bien 
entendu que Wolfgang ne me l'a pas envoyé et que par 
conséquent je ne pourrat pas le fournir aux amts con- 
tre le priz habituel (soit 200F). 


YX  * 
Salut, 


J'ai bien reçu tous les numéros de PPC 
et les cartes magnétiques. Merci pour tout. 
En remplissant le bulletin d'adhésion, j'ai 
dû confondre la ville où j'habite et celle où je tra- 
vaille. Je vous redonne mon adresse et mon numéro de 
téléphone (que je viens d'avoir) 


Toulouse, 


PPC-T N 3 


T110 RAYNAUD Philippe 

294 Résidence Percevalière 
38170 Seyssinet 

tel 16 (76) 48 51 82 


Dans le labo où je travaille, on a un HP 
9845 B, et j'ai écrit un programme pour sortir des c 
codes barre sur une table traçante. Si j'arrive à sor- 
tir la plupart des codes (en particulier ceux codés 
sur 2 octets), j'ai du mal à sortir des codes plus 1 
longs comme les codes des fonctions synthétiques.(le 
2° des 4 octets). 

Pourriez-vous m'indiquer ce 2° octet ainsi 
que le calcul du 3° octet de controle des lignes de 
programme si vous le savez. En attendant je continue 
3 checher. Peut-être pourrais-je aprés, si celà donne 
entiëêre satisfaction, proposer des codes barre aux 
adhérents, 


Je ne suts guére comrétent en codes barre 
n'en ayant pas moi-même. Beaucoup de détails ont £t6 
publiés dans PPCJ-USA, trop pour qu'il soit posst- 
ble de faire des photocopies. 

Il y avait joint à cette lettre de trés 
beaux codes barre. L'idéal serait de disposer d'un 
convertisseur permettant d'envoyer les programmes de 
la 41C sur l'ordinateur sans avoir à Les re taper. 


* * 


Les adhérents suivants n'ont ni renouvelé leur cotisa- 
tion ni indiqué qu'ils veulent nous quitter. ILS NE 
RECEVRONT PAS CE NUMERO si vous les connaissez » pré- 
venez-les!1! 


T37 T38 T48 T50 T59 T72 T74 T79 T89 T92 TJ 
Doivent songer à renouveler leur cotisation sans quoi 
ils ne recevront pas le PROCHAIN numéro: 


T5 T7 T8 T12 T13 Tl4a T15 T18 T19 T21 T25 T30 


Sauf erreurs ou ommissions!!t! 


* _* 


T123 Papin Gilbert 9 rue du Hameau de Bellevue 91230 
Montgeron 

T124 Jacquemotte Jean-Jacques 59 rue Michel Body 
B-4330 Grâce Hollogne Belgique 

T125 Flandin Michel 16 rue Armand Fallières 63100 
Clermont Ferrand 16 (73) 37 O7 66 

T126 Le Gallo Pierre 17 rue Cardinet 75017 Paris 

T127 Boucherie Jean Philippe 10 rue du Dr Barraud 
33000 Bordeaux 

T128 Lautru Pascal 28 rue Jean-Martin 13005 Marseille 
16 (91) 48 17 25 

T129 Epineuze Pierre 55 rue de Panette 27000 Evreux 
16 (32) 33 31 46 

1130 Hebert Pierre l4bis rue des Vieilles 25000 
Besançon 16 (81) 82 25 88 

T131 Baudoïn jean-Pierre lieu dit " les carabiniers" 
Castelnau d'estretefond 31620 Fronton 

T132 Moulinier Alain Eisenbahnstr. 16 D76 Offenburg- 
Rammersweier .RFA 19 49 781 3 17 O4 

T133 Nicolas Michel 12 av Gabrielle 52000 Chaumont 
Y6 (25) 32 22 73 

T134 Connan Daniel 152 av Jean Jaurés 93500 Pantin 
16 (1) 848 25 72 

T135 Granger Jean-Michel 47 rue du Repos 69007 Lyon 
16 (7) 858 71 69 

T136 Gengoux Eric 8 rue de Furtenberg 75006 Paris 
16 (1) 633 65 79 

T137 Bruguières Roland Les Amandiers D3 Montée St 
Jean 20000 Ajaccio 16 (95) 22 30 88 

T138 Denoyer Eric 61 rue Madame 75006 Paris 
16 (1) 548 29 06 

1139 Herlicq Vincent 3 rue Berteaux Dumas 92200 
Neuilly / Seine 16 (?) 624 26 17 

T140 CID Jean-Claude 40 av Wilson 94230 Cachan 

Tl4l Indjehagopian Jean-Pierre 142 Grand rue 92380 
Garches 16 (1) 741 21 97 

T142 Droin Ravier Patrice 10 Bd Malesherbes 75008 

9687 Paris 16 (1) 265 32 31 

Tl43 Diner Olivier 33 av du Mal Lyautey 75016 Paris 

Tl44 Alajouanine Yves 108bis rue Hénon 69004 Lyon 
16 (78) 29 02 68 

T145 De Mengin 11 av C. Coquelin 75007 Paris 

9037 16 (1) 734 99 05 

T146 Bergans Yvan Rue des Bruyéres L 4940 TROOZ 
Belgique tel (41) 51 69 14 

Tl47 Barris Pierre Emmanuel 39 route de Paris 78760 
Pontchartraïn 16 (3) 489 08 23 

T148 Bosom Bruno 10 av du Grand Large 66000 Perpignan 


éhe y agésr de luxe. - Su ae prudiour sante 
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Chers tous, 

Mon grand travail depuis deux mois vient de 
se concrétiser en un Livre: "AU FOND de La HP-41C" en 
ibrégé AF) dont vous trouverez la description dans la 
circulàäire ci-jointe. Le but de ce livre est de pro- 
curer une base de départ solide pour le travail du club 
- et en Français!l-. J'éspére que vous y trouverez la 
réponse à la plupart de vos questions. 

Il est cependant évident, ne serait-ce qu'a 
cause de l'évolution des connaissances, que ce livre 
ievra évoluer. C'est une des raisons pour lesquelles 
: 1 est imprimé à un assez petit nombre d'exemplaires 
ie façon à permettre des corrections au fil des édi- 
tions. Ces corrections et améliorations seront publiées 
ians PPC-T, ce qui fait que les acheteurs des premiers 
:xemplaires ne seront pas lésés. 

A ce propos je dois faire une clarification 


jue j'ai trop longtemps négligée. Sur le plan financier. 


es finances du club PPC-T et les finances de Mr Dodin 
sont séparées depuis Juillet 1982, date de dépot des 
statuts. La plupart des activités du club sont main- 
-enant auto financées et je n'ai plus besoin de ser- 
zir de banquier. Il vous faut donc établir vos chéques 
iu nom de PPC. Cependant les mandats doivent être en- 
Joyés soit au trésorier (T15) soit à moi-mêmeiTl) à 
otre nom, sinon la poste refuserait de nous les payer. 

De plus je continue à fournir personnellement 
certains articles qui sont: 

- C6 fonctions sur carte plastique 25 F(1,60) 
‘je reverse au club 5 F pour les autocollants, le reste 
saye les fournitures et mon travail) 

- la librairie d'EPROM. Le programmeur d'E- 
2ROM disponible à Toulouse a été intégralement payé 
Jar moi et le travail est fait par moi, il est donc 
1ormai que le prix des EPROM me revienne (il s'en faut 
ie beaucoup que je sois encore rentré dans mes frais) 

- le livre L4 “Au FOND de la HP-41C" est écrit 
st financé entièrement par moi et c'est donc moi qui 
in encaisse Le prix (réduit pour les adhérents). 

Pour ces trois articles, soyez assez aimable 
our faire le chèque à mon nom, merci. 

La première édition du livre devrait couvrir 
les frais et permettre d'en faire une seconde, sans 
lus, mais si la vente est bonne (quelques milliers) 
‘1 y aura des bénéfices. J'aimerai assez réinvestir 
-es bénéfices en éditant d'autres livres sur un sujet 
jui nous intéresse, mais pas écrits par moi, cette 
’ois. Si l'un de vous se sent de taille, je pense que 
.20 pages sur 1l'HP-IL et les X-mémoires ne seraient 
as de trop... 


Les Toulousains (ou voisins) seront peut-étre 
intéressés de savoir que j'envisage de louer le pro- 
grammeur d'EPROM à la semaine, sans doute 100 F, ce 
qui diminue fortement le prix de la programmation en 
iangage machine, car c'est surtout le temps passé qui 
coûte cher. 

A propos de prix élevé, celui des cartes ma- 
gnatiques d'origine HP vient d'augmenter de 62% ä la 
FNAC Toulouse. Je suis obligé de répercuter cette aug- 
mentation, excusez-m-en. Ceux d'entre vous qui ont 
déja commandé C7 cartes magnétiques HP en recevront 
70 pour leurs 200 F ou seront remboursés... Sinon le 
prix sera de: 

C7 80 cartes magnétiques HP avec classeur 
250 F, ce qui est encore beaucoup moins cher qu'au 
détail. 

Je pense tout à coup que je n'ai pas signalé 
depuis longtemps l'exellent livre d'initiation aux 
calculatrices programmables intitulé “mathématiques 
et calculatrices de poche" de Noël et bastier chez 
Technique et Vulgarisation. Basé sur les mathématiques 
du lycée, ce livre vous montre comment faire des pro- 
grammes, sans se soucier du type de calculatrice uti- 
lisé. C'est le meilleur livre d'apprentissage que je 
connaisse et de loin.En vente dans toutes les bonnes 
librairies. 

NOP: Un de ceux qui m'ont commandé P2 East 
coast conference n'a pas reçu les pages 50 ä 80. Qu’ 
{1 se fasse connaitre, il les recevra par retour. 


Changements d'adresses: 

T19: Ambassade de France Damas, 37 quai d'Orsay 75002 
Paris 

T46 5 rue de Cernay 67100 Strasbourg 

T21 Chemical Engineering Department U.C.S.B. Santa 
Barbara Ca 93106 USA 


Nouveaux adhérents: 


T103 Cocard Pascal 5 rue de la Saida 75015 Paris 

T104 HAEUSLER Fabrice 4 rue Ferdinand Bebel 31500 
Toulouse 

T105 Sirodot Jacques 9 rue Dusenbach 67500 Marien- 
thal 

T106 Jacques Vaucelle “La Chasserie" 35133 Romagné 
tel 16/(99) 98 83 69 

T107 Houziaux Gérard 10 rue César Frank 78330 
Fontenay le Fleury 

T108 Pawlicki René 34 rue de Philippeville 62220 
Carvin 

T109 Revilliod Régis 15 rue du Pré Brécel 35400 
St Malo 

T110 Raynaud Philippe 294 résidence Percevaliére 
38170 St Egréve 

TLIL Frederic Nedelec 16 rue La Bruyére 22000 St 
Brieuc 

TLi2 Le Roch Olivier 51 rue de Bel Air 17000 La 
Rochelle (?) 34 13 77 

T113 Allaud Bernard Villa Bethanie Entraide 97200 
Fort de France 

Tila Colombani Dominique 32 rue des chardonnerets 
92160 Antony () 237 69 69 

T115 Luc de Rancourt 11 Bd St Germain 75005 Paris 

T116 Jean Durand 5 rue G. Fauré 28500 Vernouillet 

TLE7 Pierre David 45 rue H. Barbusse 91330 Yerres 
(2) 948 19 10 

T118 Bullukian Jean 64 rue Boileau 69006 Lyon 

Ti119 Cayrac Didier 22 rue Jules Ferry 47300 

(8227) Villeneuve/Lot (53) 70 91 03 

TL20 Tredez Bruno Champ fleuri Bouvron 44130 Blaïn 
16 (40) 25 31 16 

TI21 Scherpereel Pierre 660 B Av de la République 
59800 Lille 16 (20) 31 O7 71 

T122 Paul Bernard 36 rue des Maisons neuves 91700 


Ste geneviéve des Boîs 16 (6) 016 48 54 


Petites annonces 


T23 2 HP &#l CV 03 et 04/82 1850 F piéce; 2 HP-IL 
900F piéce; 2 lecteurs de cassettes 03 et 07/82 3750/p 
1 imprimante HP-IL 3200 F; 1 interface Vidéaoavec moni- 
teur Net B 2800 F (2300 sans moniteur); L lecteur de 
cartes magnétiques 1000 F; 2 lecteurs de codes barre 
750 F /p, 2 modules X-F 525 F/p; 1 module Time 650 F/p 
avec solution book-remise par lot 


Tal 3 modules de mémoire simples 150 F/p ou 400 
les 3. 
T61 &1C + quad Mars 82 2000F à débattre 


HP US a eu l'extrême amabilité de nous faire parvenir 
une copie des listages du microcode des registres in- 
ternes en version originale HP commentée. 

Ces listages sont trés précieux pour la programmation 

en micracode, mais je ne les recommande pas aux dé- 
butants car ils sont difficiles à lire, n'étant codés 

ni dans la même base (octail) ni avec les mêmes mnémoni- 
ques, ni avec la même pagination que ceux du club. 

Ces photocopies seront cependant disponibles aux condi- 
tions suivantes: 

P8 Microcode HP env 400 pages , relié 200 F + 20 F port, 
Je viens de recevoir un descriptif complet des fonctions 
de l'EPROM HP-IL Monitor 

P9 doc. Monitor 9 F (2,90) 


On annonce un module standard HP de 8K (!) basé sur 
l'HP-IL Monitor avec de nombreuses fonctions supplémen- 
taires. 
Toujours sur l'HP-IL, un livre annoncé dans Key Notes 
et dont j'ai pu voir des extraits: 
The HP-IL system, un guide introductif à la boucle d'in- 
terface de Hewlett-Packard (HP-IL) par Gerry Kane, Steve 
Harper et David Ushigima 106 pages 18,5x23 cm 

Un manuel écrit par les responsables HP du 
developpement de l'HP-IL: $16,99 

Osborne/McGraw-Hill 

630 Bancroft Way 

Berkeley, CA 94710 
Difficile, débutants s'abstenir. Contient tous ce 
qu'il faut ä un bon informaticien/électronicien pour 
construire et commander sa propre interface sur la bou- 
cle HP-IL 


CONVOCATION: Nos camarades suisses sont informés que 

le groupe Suisse Romande vient de débuter ses activités 
et que leur première assemblée générale aura lieu le 
Same di 4 Décembre à Lausanne.L'adresse est PPC-CH case 
79 1000 Lausanne 24. 

Le responsable est Philippe Romanesco 9944 T 69, Grand 
Vennes 39 1010 Lausanne. Cet étourdi ne m'a pas dit où 
a lieu l'AG ! renseignez-vous. 


PROPOSITION 
CODES-BARRES Tyve 5 "Paner Keyboard" non fournis par HP 
- 41 “extended functions" + 4 divers (cf PPC T n°1 13) 


Dans le même numéro de l'Ordinateur de Poche qui rap- 
pelait notre existence (Novembre) était indiquée l'a- 
dresse d'un nouveau club HP en Belgique. J'ai immé- 


- 26 fonctions du lecteur de cartes commensant 227 7 di atement écrit à son responsable pour lui proposer 
(fonctions “P 57/97) nos services, sans réponse pour l'instant: 


- une page contenant une reduction @es 2 »remières. HP+club, 
J'envoie ces 3 pages contre un tinbre à 2730 et 10F. 


Cart de Wiart 10 
JP(TS09720)2ENYIER ours de :ONTRIN 24110 5t-ASTIIR Bs Garros 


4000 Liège 


158 2h ACTES JE EX PruwiAns ADROAUE Belgique 
nue les nrosrammese disvonibies se trouvent sur s 
fe ; : et 
les listes qui raraftront rérilièrerent, ites annonces (suite) 


T15 vends module financier 1D (dernière version) 200 F 
Zowtee les demandes sont à adresser à 
Dsrien 2E3RIL 
S, vue lu 6 2 


i 
55100 1125B. ©CK 


Les proprammesg peuvent tre obtenus sur cartes 
cu sur cas-attes (si vous envovez une cassette 


x 


nouve, faites d'ahbr4 ET), 
£ C'est tout ce que je vois à dire pour cette fois-ci. 
_nur les commandes sur cartes, 11 est femandé : q j 
1\arenyrrer le nombre ñe cartes néreseaires 
(sr cas je Acute en ervover rl's, ne serait-ce 
que rrur iviter les léfectieuses si elles ont 


à bientôt 


i J-D Dodin 

4$j> servi ; cela veut arriver) 
:) jnindre ‘me ernveïlcvore timbrée à votre adresse 

(L,EC F cu 1,EC #) 
5) inirire ‘in netit carton pour évbter le pliare 

ies cartas en ccuirs de route. 
1) S-jndre la licte des nrocramres fésirés avec 

5 


le nurérr fe réf ence d'1 journal cù le ororram 
T8 ag varu. 

5) -ar resure ie nrécrution coupez le crin des 
nartece vour éviter in affacerent var inadver- 


FNCPe 





nur les comrandes sur cassettes vrocéder comme 
ci-isssus vec quelques variantes : 
1) une seule cassette ievmit satisfaire votre 
aprfiit pgloutcn 
SY or‘vcir un sffranchissement suffisant 
(2,30 Fou 5,3C #). Sinon vous vaierez la 
i:xe ou retcur. 
ÿne cassette dans sa hofte nèse 20 erammes. 
3) srévoir un emballase un pem plus solide que 
rour les cartes( tant à l'aller qu'su retcur). 


nrocranres dont la liste 


es Dr 
lise Ne 





2 (1 carés) — ntcA 
(À - Y= LITE 
Ci = ) = 72 

1x5 2 (1 -  ) = Jé (Dassault risht) 
(4 = } - CDR (Cañran solaire) 

Vi s (2 —  ) — IATEX 
(2 Les ) LL 143 
CZ  ) = 651 
(1 — ) - : (äorlose) 4 

9 Es CE — 7 = AT 
(EH — ) = ra k 
(2 = ) = ouf 738 alrti 
(1 é de. LA 
QT = ) = DN (les 2 yersirne) À 
{2 = }= CIIC ST | \ 
CL - } = ,24 (35 cartes + 1 © de données 
(1 = Vis ï 
{1 -  ) - LE 

9 2 9 (5 = ) = !1 (Pcker) 
(5 -'" ) = :3 (roxer) 
fa -  ) — 248425 
Êi = )- Fi 


Ji nueisue cnrse ne sable pas an 
rantilleses 4e me le faire savcit. ae ie ke A 
lrchsez les fantes ie fronre, mais je fais ce 

rue je raux en espérant n'u'oyec vn reu f'eniref- 


nerernt vous aurez nlus de olajiseir à me lire, 


Stant schilatélirte lorsone ma zk 4127 ne leisee 
+rang'iile, voue vcivez ef vous ma feras nleieir 
on -“ettart de “oiis timbres sur les envel:nnes 
sue ynruis n'sires-eres sinei que sur les vôtres 
Ti vous Yevieniront, 


Damien DEBRIL 


